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This  book  is  intended  to  serve  as  a  source  and  a  reference  for  the  assembly  language 
programmer.  It  contains  an  overview  of  assembly  language  programming  for  a  partic- 
ular microprocessor  and  a  collection  of  useful  subroutines.  In  the  subroutines,  a 
standard  format,  documentation  package,  and  parameter  passing  techniques  were 
used.  The  rules  of  the  most  popular  assemblers  have  been  followed,  and  the  purpose, 
procedure,  parameters,  results,  execution  time,  and  memory  usage  of  each  routine 
have  been  described. 

The  overview  sections  summarize  assembly  language  programming  for  those  who 
do  not  have  the  time  or  need  for  a  complete  textbook;  the  Assembly  Language 
Programming  series  provides  more  extensive  discussions.  Chapter  1  introduces 
assembly  language  programming  for  the  particular  processor  and  summarizes  the 
major  features  that  make  this  processor  different  from  other  microprocessors  and 
minicomputers.  Chapter  2  shows  how  to  implement  instructions  and  addressing 
modes  that  are  not  explicitly  available.  Chapter  3  describes  common  programming 
errors. 

The  collection  of  subroutines  emphasizes  common  tasks  that  occur  in  many  applica- 
tions. These  tasks  include  code  conversion,  array  manipulation,  arithmetic,  bit 
manipulation,  shifting  functions,  string  manipulation,  sorting,  and  searching.  We 
have  also  provided  examples  of  1/  O  routines,  interrupt  service  routines,  and  initializa- 
tion routines  for  common  family  chips  such  as  parallel  interfaces,  serial  interfaces,  and 
timers.  You  should  be  able  to  use  these  programs  as  subroutines  in  actual  applications 
and  as  starting  points  for  more  complex  programs. 

This  book  is  intended  for  the  person  who  wants  to  use  assembly  language  imme- 
diately, rather  than  just  learn  about  it.  The  reader  could  be 

•  An  engineer,  technician,  or  programmer  who  must  write  assembly  language 
programs  for  a  design  project. 

•  A  microcomputer  user  who  wants  to  write  an  1/  O  driver,  a  diagnostic  program,  a 
utility,  or  a  systems  program  in  assembly  language. 
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■  An  experienced  assembly  language  programmer  who  needs  a  quick  review  of 
techniques  for  a  particular  microprocessor. 

•  A  systems  designer  who  needs  a  specific  routine  or  technique  for  immediate  use. 

•  A  high-level  language  programmer  who  must  debug  or  optimize  programs  at  the 
assembly  level  or  must  link  a  program  written  in  a  high-level  language  to  one 
written  in  assembly  language. 

•  A  maintenance  programmer  who  must  understand  quickly  how  specific  assembly 
language  programs  work. 

•  A  microcomputer  owner  who  wants  to  understand  the  operating  system  for  a 
particular  computer  or  who  wants  to  modify  standard  I/O  routines  or  systems 
programs. 

•  A  student,  hobbyist,  or  teacher  who  wants  to  see  examples  of  working  assembly 
language  programs. 

This  book  can  also  serve  as  a  supplement  for  students  of  the  Assembly  Language 
Programming  series. 

This  book  should  save  the  reader  time  and  effort.  The  reader  should  not  have  to 
write,  debug,  test,  or  optimize  standard  routines  or  search  through  a  textbook  for 
particular  examples.  The  reader  should  instead  be  able  to  obtain  easily  the  specific 
information,  technique,  or  routine  that  he  or  she  needs.  This  book  has  been  organized 
and  indexed  for  rapid  use  and  reference. 

Obviously,  a  book  with  such  an  aim  demands  feedback  from  its  readers.  Although 
all  the  programs  have  been  thoroughly  tested  and  carefully  documented,  please  inform, 
the  publisher  if  you  find  any  errors.  If  you  have  suggestions  for  better  methods  or  for 
additional  topics,  routines,  programming  hints,  or  index  entries,  please  tell  us  about 
them.  We  have  used  our  programming  experience  to  develop  this  book,  but  your  help 
is  needed  to  improve  it.  We  would  greatly  appreciate  your  comments,  criticisms,  and 
suggestions. 


NOMENCLATURE 

We  have  used  the  following  nomenclature  in  this  book  to  describe  the  architecture  of 
the  Z80  processor,  to  specify  operands,  and  to  represent  general  values  of  numbers  and 
addresses. 
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Z80  Architecture 

Byte-length  registers  include 


A  (accumulator) 

B 

C 

D 

E 

H 

L 

F  (flags) 

I  (interrupt  vector) 


R  (refresh) 

A' 

B' 

C 

D' 

E' 

H' 

L' 

F' 


Of  these,  the  primary  user  registers  are  the  first  seven:  A,  B,  C,  D,  E,  H,  and  L.  The  I 
(interrupt  vector)  register  contains  the  more  significant  byte  (page  number)  of  inter- 
rupt service  addresses  in  Interrupt  Mode  2.  The  R  (refresh)  register  contains  a  memory 
refresh  counter.  The  F  (flag)  register  consists  of  a  set  of  bits  with  independent  functions 
and  meanings,  organized  as  shown  in  the  following  diagram: 


5  4 


I  0 


z 

X 

Ac 

X 

P/O 

N 

-Bit  Number 

-Processor  Status  Register  F 


Carry 

Add/ Subtract 
Parity/ Overflow 
Not  Used  (Logic  I) 
Auxiliary  Carry 
Not  Used  (Logic  1) 
Zero 
Sign 


Register  pairs  and  word-length  registers  include 

AF 

(Accumulator  and  flags,  accumulator  most  significant) 

AF 

(Registers  A'  and  F',  A'  most  significant) 

BC 

(Registers  B  and  C,  B  most  significant) 

BC 

(Registers  B'  and  C",  B'  most  significant) 

DE 

(Registers  D  and  E,  D  most  significant) 

DE' 

(Registers  D'  and  E',  D'  most  significant) 

HL 

(Registers  H  and  L,  H  most  significant) 

HL' 

(Registers  H'  and  L',  H'  most  significant) 

IX 

(Index  register  X  or  IX) 

lY 

(Index  register  Y  or  lY) 

PC 

(Program  counter) 

SP 

(Stack  pointer) 

Flags  include 

Add/ Subtract  (N) 
Carry  (C) 

Auxiliary  Carry  (Ac) 


X   Z80  ASSEMBLY  LANGUAGE  SUBROUTINES 


Parity/ Overflow  (P/O  or  P/V) 
Sign  (S) 
Zero  (Z) 

These  flags  are  arranged  in  the  F  register  as  shown  previously. 

Miscellaneous  facilities  include 

Interrupt  Flip-flop  1  (IFFl) 
Interrupt  Flip-flop  2  (IFF2) 


Z80  Assembler 

Delimiters  include 

After  a  label,  except  for  EQU,  DEFL,  and  MACRO,  which  require  a  space 
space  After  an  operation  code 

,  Between  operands  in  the  operand  (address)  field 

;  Before  a  comment 

(,)  Around  memory  references 

All  operands  are  treated  as  data  unless  they  are  enclosed  in  parentheses. 
Pseudo-Operations  include 

DB  or  DEFB  Define  byte;  place  byte-length  data  in 

memory. 

DEFL  Define  label  (may  be  redefined  later). 

DEFM  Define  string;  place  ASCII  data  in  memory. 

DS  or  DEFS  Define  storage;  allocate  bytes  of  memory. 

DW  or  DEFW  Define  word;  place  word-length  data  in 

memory. 

END  End  of  program. 

EQU  Equate;  define  the  attached  label. 

ORG  Set  origin;  place  subsequent  object  code 

starting  at  the  specified  address. 

Designations  include 
Number  systems: 

B (suffix)  Binary 
D  (suffix)  Decimal 
H  (suffix)  Hexadecimal 
Q  (suffix)  Octal 

The  default  mode  is  decimal;  hexadecimal  numbers  must  start  with  a  digit  (you  must 

add  a  leading  zero  if  the  number  starts  with  a  letter). 

Others: 

'  '  or  "  "ASCII  (characters  surrounded  by  single  or  double  quotation  marks) 
$         Current  value  of  location  (program)  counter 
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ADDR  A  16-bit  address  in  data  memory 

ADDRl  A  )6-bit  address  in  data  memory 

ADDR2  A  16-bit  address  in  data  memory 

BASE  A  constant  16-bit  address  in  data  memory 

EICON  An  8-bit  data  item  in  binary  format 

CONST  A  constant  8-bit  data  item 

DEST  A  16-bit  address  in  program  memory,  the 

destination  for  a  jump  instruction 

HIGH  A  16-bit  data  item 

INDIR  A  16-bit  address  in  data  memory,  the  start- 
ing address  for  an  indirect  address.  The 
indirect  address  is  stored  in  memory 
locations  INDIR  and  INDIR-I-I. 

LOW  A  16-bit  data  item 

MASK  An  8-bit  number  used  for  masking 

n  A  bit  position  in  a  byte;  possible  values  are 
0  through  7 

NPARAM  A  16-bit  data  item 

NEXT  A  16-bit  address  in  program  memory 

NRESLT  A  16-bit  data  item 

NTIMES  An  8-bit  data  item 

NTIML  An  8-bit  data  item 

NTIMM  An  8-bit  data  item 

NUM  A  16-bit  data  item 

NUMl  A  16-bit  address  in  data  memory 

NUM2  A  16-bit  address  in  data  memory 

OFF  An  8-bit  fixed  offset 

OFFSET  An  8-bit  fixed  offset 

oper  An  8-bit  data  item,  a  register,  (HL),  or  an 

indexed  address 

OPER  A  16-bit  address  in  data  memory 

OPERl  A  16-bit  address  in  data  memory 

OPER2  A  16-bit  address  in  data  memory 

reg  A  primary  user  register  (A,  B,  C,  D,  E,  H,  or  L) 

regl  A  primary  user  register 

RETPT  A  16-bit  address  in  program  memory 

rp  A  primary  register  pair  (BC,  DE,  or  HL) 

rph  The  more  significant  byte  of  rp 

rpl  The  less  signif  icant  byte  of  rp 

rpl  A  primary  register  pair 

rplh  The  more  significant  byte  of  rpl 

rpU  The  less  significant  byte  of  rpl 

i'p2  Another  primary  register  pair,  not  the  same  as  rpl 

rp2h  The  more  significant  byte  of  rp2 

ip21  The  less  significant  byte  of  rp2 

SPTR  A  16-bit  address  in  data  memory 

STRNG  A  16-bit  address  in  data  memory 

SUM  A  16-bit  address  in  data  memory 

TEMP  A  16-bit  address  in  data  memory 

VAL16  A  16-bit  data  item 

VAL16H  The  more  significant  byte  of  VAL16 

VAL16L  The  less  significant  byte  of  VAL16 

VALUE  An  8-bit  data  item 

xy  An  index  register,  either  IX  or  lY 


Chapter  1  General 

Programming  Methods 


Some  general  methods  for  writing  assembly  language  programs  for  the  Z80  micro- 
processor are  presented  in  this  chapter.  In  addition,  techniques  for  performing  the 
following  operations  are  explained: 

■  Loading  and  saving  registers 

•  Storing  data  in  memory 

■  Arithmetic  and  logical  functions 

•  Bh  manipulation  and  testing 

■  Testing  for  specific  values 

•  Numerical  comparisons 

•  Looping  (repeating  sequences  of  operations) 

■  Array  processing  and  manipulation 

•  Table  lookup 

•  Character  code  manipulation 

•  Code  conversion 

•  Multiple-precision  arithmetic 

■  Multiplication  and  division 

•  List  processing 

■  Processing  of  data  structures. 

Also  included  in  this  chapter  are  special  sections  that  describe  passing  parameters  to 
subroutines,  general  methods  for  writing  I/O  drivers  and  interrupt  service  routines, 
and  ways  of  making  programs  run  faster  or  use  less  memory. 

The  operations  described  are  required  in  such  applications  as  instrumentation,  test 
equipment,  computer  peripherals,  communications  equipment,  industrial  control, 
process  control,  business  equipment,  aerospace  and  military  systems,  and  consumer 
products.  Microcomputer  users  will  employ  these  operations  in  writing  I/O  drivers, 
utility  programs,  diagnostics,  and  systems  software,  and  in  understanding,  debugging, 
and  improving  programs  written  in  high-level  languages.  This  chapter  provides  a  brief 
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guide  to  Z80  assembly  language  programming  for  those  who  have  an  immediate 
application  in  mind. 

SUMMARY  FOR  EXPERIENCED  PROGRAMMERS 

For  those  who  are  familiar  with  assembly  language  programming  on  other  comput- 
ers, we  provide  here  a  brief  review  of  the  peculiarities  of  the  Z80.  Being  aware  of  these 
unusual  features  can  save  a  lot  of  time  and  trouble. 

1 .  Arithmetic  and  logical  operations  are  allowed  only  between  the  accumulator  and 
a  byte  of  immediate  data,  the  contents  of  a  general-purpose  register,  the  contents  of  the 
address  in  register  pair  HL,  or  the  contents  of  an  indexed  address.  Arithmetic  and 
logical  instructions  do  not  allow  direct  addressing. 

For  example,  the  alternatives  for  the  OR  instruction  are  OR  CONST,  where  CONST 
is  a  fixed  data  byte;  OR  reg,  where  reg  is  an  8-bit  general-purpose  register;  OR  (HL); 
and  OR  (xy-|-OFF).  The  third  alternative  logically  ORs  the  accumulator  with  the  data 
byte  located  at  the  address  in  HL.  The  fourth  alternative  logically  ORs  the  accumula- 
tor with  the  data  byte  located  at  an  indexed  address;  the  processor  determines  the 
address  by  adding  the  8-bit  offset  OFF  to  a  16-bit  index  register. 

2.  The  accumulator  and  register  pair  HL  are  special.  The  accumulator  is  the  only 
byte-length  register  that  can  be  loaded  or  stored  directly.  The  accumulator  is  also  the 
only  register  that  can  be  complemented,  negated,  shifted  with  a  single-byte  instruction, 
loaded  indirectly  from  the  addresses  in  register  pairs  BC  or  DE,  stored  indirectly  at  the 
addresses  in  register  pairs  BC  or  DE,  or  used  in  IN  and  OUT  instructions  with  direct 
addressing. 

HL  is  the  only  register  pair  that  can  serve  as  an  indirect  address  in  arithmetic  or  logi- 
cal instructions  or  in  loading  or  storing  registers  other  than  the  accumulator.  HL  is  also 
the  only  register  pair  that  can  be  transferred  to  the  program  counter  or  stack  pointer. 
Furthermore,  HL  serves  as  a  double-length  accumulator  in  16-bit  addition  and  sub- 
traction. Register  pair  DE  is  also  special  because  the  instruction  EX  DE,HL  can 
exchange  it  with  HL.  Thus,  the  Z80's  registers  are  highly  asymmetric,  and  the  pro- 
grammer must  carefully  choose  which  data  and  addresses  go  in  which  registers. 

3.  There  are  often  several  names  for  the  same  physical  register.  The  registers  A,  B, 
C,  D,  E,  H,  and  L  are  all  available  as  8-bit  registers.  The  register  pairs  BC  (B  more 
significant),  DE  (D  more  significant),  and  HL  (H  more  significant)  are  also  available 
as  16-bit  register  pairs  in  many  instructions.  The  terms  "register  pair  B,"  "registers  B 
and  C,"  and  "register  pair  BC"  all  have  the  same  meaning,  and  there  are  similar 
variations  for  registers  D  and  E  and  H  and  L.  Note  that  the  register  pair  and  the  two 
single  registers  are  physically  identical  and  cannot  be  used  for  different  purposes  at  the 
same  time. 
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In  fact,  H  and  L  are  almost  always  used  to  hold  an  indirect  address  because  of  the 
availability  of  instructions  that  access  the  data  at  that  address  as  well  as  special 
instructions  hke  LD  SP,HL;  JP  (HL);  EX  (SP),HL;  and  EX  DE,HL.  Register  pair  DE 
is  used  for  a  second  address  when  one  is  needed  because  of  the  EX  DE,HL  instruction. 
Registers  B  and  C  are  generally  used  as  separate  8-bit  registers  for  temporary  data 
storage  and  counters. 

4.  The  effects  of  instructions  on  flags  are  extremely  inconsistent.  Some  particularly 
unusual  effects  are  (a)  logical  instructions  clear  the  Carry,  (b)  one-byte  accumulator 
rotate  instructions  affect  no  flags  other  than  the  Carry,  (c)  load,  store,  transfer, 
increment  register  pair  or  index  register,  and  decrement  register  pair  or  index  register 
instructions  affect  no  flags  at  all,  and  (d)  16-bit  addition  (ADD  HL  or  ADD  xy)  affects 
only  the  Carry  flag.  Table  A-1  in  Appendix  A  can  be  used  as  an  aid  in  determining  how 
an  instruction  affects  the  flags. 

5.  There  is  no  indirect  addressing  through  memory  locations.  The  lack  of  indirect 
addressing  is  overcome  by  loading  the  indirect  address  into  register  pair  HL.  Thus, 
indirect  addressing  is  a  two-step  process.  The  indirect  address  can  also  be  loaded  into 
registers  pair  BC  or  DE,  but  it  can  then  only  be  used  to  load  or  store  the  accumulator. 

6.  The  Z80's  indexing  allows  only  an  8-bit  fixed  offset  in  the  instruction.  Its  main 
purpose  is  to  implement  postindexing  and  to  allow  offsets  in  data  structures.  A  more 
general  form  of  indexed  addressing  requires  an  explicit  16-bit  addition  of  register  pairs 
using  HL  as  a  16-bit  accumulator.  Thus,  indexing  usually  requires  several  steps:  The 
index  must  be  loaded  into  one  register  pair,  the  base  address  must  be  loaded  into 
another  register  pair  (one  pair  must  be  HL),  the  two  must  be  added  explicitly  (using 
ADD  HL,rp),  and  the  sum  must  be  used  as  an  indirect  address  (by  referring  to  (HL)). 
Generalized  indexing  on  the  Z80  is  a  long,  awkward  process. 

7.  There  is  a  combined  Parity/ Overflow  indicator.  This  flag  indicates  even  parity 
after  all  instructions  that  affect  it  except  addition  and  subtraction.  Then  it  indicates  the 
occurrence  of  two's  complement  overflow. 

8.  Many  common  instructions  are  missing  but  can  easily  be  simulated  with  register 
operations.  Some  examples  are  clearing  the  accumulator  (use  SUB  A  or  XOR  A), 
clearing  the  Carry  flag  (use  AND  A  or  OR  A),  and  logically  shifting  the  accumulator 
left  (use  ADD  A,A).  Either  AND  A  or  OR  A  clears  the  Carry  flag  and  sets  the  other 
flags  according  to  the  contents  of  the  accumulator.  But  remember,  loading  a  register 
does  not  affect  any  flags. 

9.  There  are  both  relative  and  absolute  branches  (using  the  operation  codes  JR  and 
JP,  respectively).  Both  addressing  methods  are  allowed  for  unconditional  branches. 
The  sets  of  conditional  branches  differ;  relative  branches  exist  only  for  the  Carry  and 
Zero  flags,  whereas  absolute  branches  exist  for  the  Carry,  Sign,  Parity/  Overflow,  and 
Zero  flags.  What  is  interesting  here  is  that  the  relative  branches  occupy  less  memory 
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than  the  corresponding  absolute  branches  (2  bytes  rather  than  3)  but  execute  more 
slowly  if  the  branch  is  taken  (12  cycles  rather  than  10). 

10.  Increment  and  decrement  instructions  behave  differently,  depending  on  whether 
they  are  applied  to  8-bit  or  16-bit  operands.  Decrementing  or  incrementing  an  8-bit 
register  affects  all  flags  except  the  Carry.  Decrementing  or  incrementing  a  16-bit 
register  pair  or  index  register  does  not  affect  any  flags  at  all.  A  16-bit  register  pair  can 
be  used  as  a  counter,  but  the  only  way  to  test  the  pair  for  zero  is  to  logically  OR  the  two 
bytes  together  in  the  accumulator.  The  16-bit  instructions  are  intended  primarily  for 
address  calculations,  not  for  data  manipulation. 

11.  Instructions  that  are  additions  to  the  original  8080  instruction  set  occupy  more 
memory  and  execute  more  slowly  than  other  instructions  with  similar  functions  and 
addressing  modes.  Among  them  are  bit  manipulation,  arithmetic  shift,  logical  shift, 
shifts  of  registers  other  than  the  accumulator,  and  some  loads.  These  instructions 
execute  more  slowly  because  they  require  a  prefix  byte  that  tells  the  processor  the 
instruction  is  not  an  original  8080  instruction  and  the  next  byte  is  the  real  operation 
code.  Weller  makes  it  easier  to  recognize  the  secondary  instructions  by  using  mnemon- 
ics derived  from  the  8080  instruction  set.' 

12.  Certain  registers  and  facilities  are  clearly  secondary  in  importance.  The  pro- 
grammer should  employ  them  only  when  the  primary  registers  and  facilities  are 
already  in  use  or  too  inconvenient  to  use.  The  secondary  facilities,  hke  the  secondary 
instructions,  represent  additions  to  the  underlying  8080  microprocessor.  The  most 
important  additions  are  index  registers  IX  and  lY;  many  instructions  use  these 
registers,  but  they  take  more  memory  and  much  more  time  than  instructions  that  use 
the  other  register  pairs.  Another  addition  is  the  primed  register  set.  Only  two  instruc- 
tions (EX  'AF,AF'  and  EXX)  allow  access  to  the  primed  set,  and  for  this  reason 
programmers  generally  reserve  it  for  functions  such  as  fast  interrupt  response. 

13.  Operations  that  can  be  done  directly  to  a  general-purpose  register  are  shift  it, 
transfer  it  to  or  from  another  register,  load  it  with  a  constant,  increment  it  by  1 ,  or 
decrement  it  by  1.  These  operations  can  also  be  performed  indirectly  on  the  memory 
address  in  HL  or  on  a  memory  location  addressed  via  indexing. 

14.  Only  register  pairs  or  index  registers  can  be  moved  to  or  from  the  stack.  One 
pair  is  AF,  which  consists  of  the  accumulator  (more  significant  byte)  and  the  flags  (less 
significant  byte).  The  CALL  and  RET  instructions  transfer  addresses  to  or  from  the 
stack;  there  are  conditional  calls  and  returns  but  they  are  seldom  used. 

15.  The  Z80  has  a  readable  interrupt  enable  flag.  One  can  determine  its  value  by 
executing  LD  A,I  or  LD  A,R.  Either  instruction  moves  the  Interrupt  flip-flop  to  the 
Parity/ Overflow  flag.  That  flag  then  reflects  the  state  of  the  interrupt  system  at  a 
particular  time,  and  thus  can  be  used  to  restore  the  state  after  the  processor  executes 
code  that  must  run  with  interrupts  disabled. 
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16.  The  Z80  uses  the  following  common  conventions: 

•  The  16-bit  addresses  are  stored  with  the  less  significant  byte  first  (that  is,  at  the 
lower  address).  The  order  of  the  bytes  in  an  address  is  the  same  as  in  the  8080, 8085,  and 
6502  microprocessors,  but  the  opposite  of  that  used  in  the  6800  and  6809. 

•  The  stack  pointer  contains  the  lowest  address  actually  occupied  by  the  stack.  This 
convention  is  also  used  in  the  8080,  8085,  and  6809  microprocessors,  but  the  obvious 
alternative  (next  available  address)  is  used  in  the  6502  and  6800.  Z80  instructions  store 
data  in  the  stack  using  predecrementing  (they  subtract  1  from  the  stack  pointer  before 
storing  a  byte)  and  load  data  from  the  stack  using  postincrementing  (they  add  1  to  the 
stack  pointer  after  loading  a  byte). 

•  The  interrupt  (enable)  flag  is  1  to  allow  interrupts  and  0  to  disallow  them.  This 
convention  is  the  same  as  in  the  8080  and  8085,  but  the  opposite  of  that  used  in  the 
6502,  6800,  and  6809. 

REGISTER  SET 

Z80  assembly  language  programming  is  complicated  by  the  asymmetry  of  the 
processor's  instruction  set.  Many  instructions  apply  only  to  particular  registers, 
register  pairs,  or  sets  of  registers.  Almost  every  register  has  its  own  unique  features, 
and  almost  every  instruction  has  its  own  peculiarities.  Table  1-1  lists  the  8-bit  registers 
and  the  instructions  that  use  them.  Table  1-2  lists  the  16-bit  registers  and  the  instruc- 
tions that  use  them  (of  course,  all  instructions  change  the  program  counter  implicitly). 
Table  1-3  lists  the  indirect  addresses  contained  in  on-board  register  pairs  and  the 
instructions  that  use  them.  Table  1-4  lists  the  instructions  that  apply  only  to  the 
accumulator,  and  Table  1-5  lists  the  instructions  that  apply  only  to  particular  16-bit 
registers.  Table  1-6  lists  the  instructions  that  apply  to  the  stack. 

The  general  uses  of  the  registers  are  as  follows: 

•  The  accumulator,  the  center  of  data  processing,  is  the  source  of  one  operand  and 
destination  of  the  result  for  most  arithmetic,  logical,  and  other  processing  operations. 

•  Register  pair  HL  is  the  primary  memory  address  register.  Instructions  can  often 
refer  to  the  data  at  the  address  in  HL,  that  is,  (HL). 

•  Register  pair  DE  is  the  secondary  memory  address  register  because  the  pro- 
grammer can  exchange  its  contents  with  HL  using  EX  DE,HL. 

•  Registers  B  and  C  (register  pair  BC)  are  general-purpose  registers  used  mainly  for 
counters  and  temporary  data  storage.  Register  B  is  often  used  as  a  loop  counter 
because  of  its  special  usage  in  the  DJNZ  instruction. 

•  Index  registers  IX  and  lY  are  used  when  the  programmer  is  referring  to  memory 
addresses  by  means  of  fixed  offsets  from  a  variable  base.  These  registers  also  serve  as 
backups  to  HL  when  that  register  pair  is  occupied. 
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Table  1-1.  Eight-Bit  Registers  and  Applicable  Instructions 


8-Bit  Register 

Instructions 

A  only 

CPL,  DAA;  IN  A,(port);  LD  (ADDR),LD  (BC  or  DE),  NEG; 
OUT(port),A;  RLA,  RLCA,  RLD,  RRA,  RRCA,  RRD. 

A,B,C,D,E,H,L 

ADC  A;  ADD  A;  AND,  CP,  DEC;  IN  reg,(C);  INC,  LD,  OR; 
OUT  (C),reg;  RL,  RLC,  RR,  RRC,  SBC  A;  SLA,  SRA, 
SRL,  SUB,  XOR 

B  only 

DJNZ,  IND,  INDR,  INI,  INIR,  OTDR,  OTIR,  OUTD,  OUTI 

C  only 

IN  reg,(C);  OUT  (C),reg;  IND,  INDR,  INI,  INIR,  OTDR, 
OTIR,  OUTD,  OUTI 

F  (flags) 

CCF,  SCF  (see  also  AF  register  pair) 

1  (interrupt  vector) 

LD  1,A;  LD  A,I 

R  (refresh) 

LD  R,A;  LD  A,R 

Table  1-2.  Sixteen-Bit  Registers  and  Applicable  Instructions 


16-Bit  Register 

Instructions 

AF 

POP;  PUSH;  EX  AF.AF' 

AF' 

EX  AF,AF' 

BC 

ADC  HL,  ADD  xy,  ADD  HL,  CPD,  CPDR,  CPl,  CPIR 
DEC,  EXX,  INC,  LD,  LDD,  LDDR,  LDI,  LDIR,  POP, 
PUSH, SBC  HL 

BC 

EXX 

DE 

ADC  HL,  ADD  xy,  ADD  HL,  DEC;  EX  DE,HL;  EXX,  INC, 
LD,  LDD,  LDDR,  LDI,  LDIR,  POP,  PUSH,  SBC  HL 

DE' 

EXX 

HL 

ADC  HL,  ADD  HL,  CPD,  CPDR,  CPI,  CPIR,  DEC;  EX 
DE,HL;  EX  (SP),HL;  EXX,  INC,  IND,  INDR,  INI,  INIR, 
LD,  LDD,  LDDR,  LDI,  LDIR,  OTDR,  OTIR,  OUTD, 
OUTI,  POP,  PUSH,  SBC  HL 

HL' 

EXX 

IX 

ADD  IX,  LD,  POP,  PUSH;  EX  (SP),IX 

lY 

ADD  lY,  LD,  POP,  PUSH;  EX  (SP),IY 

Program  Counter 

CALL  instructions,  JP,  JR,  RETURN  instructions,  RETI, 
RETN,  RST 

Stack  Pointer 

CALL  instructions,  ADD  HL,  DEC,  INC,  LD,  POP,  PUSH, 
RETURN  instructions,  RST 
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Table  1-3.  Indirect  Addresses  and  Applicable  Instructions 


Location  of  Address 

Instructions 

Register  pair  BC 
Register  pair  DE 
Register  pair  HL* 

Stack  Pointer 

Index  register 
XorY 

LD  A,(BC);  LD  (BC),A 
LD  A,(DE);  LD  (DE),A 

ADC  A;  ADD  A;  AND,  CP,  DEC,  INC,  JP,  LD,  OR,  SBC 
A;  SUB,  XOR 

CALL  instructions,  POP,  PUSH,  RETURN  instructions, 
RST 

JP 

*  Index  register  X  or  Y  can  also  be  used  as  an  indirect  address  f  or  the  same  instructions  as  H  L  by 
specifying  indexed  addressing  with  a  fixed  offset  of  zero. 

Table  1-4.  Instructions  That  Apply  Only  to  the  Accumulator 


Instruction 

Function 

ADC  A 

Add  with  carry 

ADD  A 

Add 

AND 

Logical  AND  immediate 

CPL 

One's  complement 

CP 

Compare 

DAA 

Decimal  adjust  (decimal  correction) 

IN  A,(port) 

Input  direct 

LD  A,(ADDR) 

Load  direct 

LD  A,(rp) 

Load  indirect 

NEC 

Two's  complement  (negate) 

OR 

Logical  OR 

OUT  (port),A 

Output  direct 

RLA 

Rotate  accumulator  left  through  carry 

RLCA 

Rotate  accumulator  left 

RRA 

Rotate  accumulator  right  through  carry 

RRCA 

Rotate  accumulator  right 

SBC  A 

Subtract  with  borrow 

SUB 

Subtract 

XOR 

Logical  EXCLUSIVE  OR 
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Table  1-5.  Instructions  That  Apply  Only  to  One  or  Two  16-Bit  Registers 


Instruction 

16-Bit  Registers 

Function 

EX  AF,AF' 

EX  DE,HL 
EX  (SP),HL 
EX  (SP),xy 
LD  SP.HL 
LD  SRxy 

AF.AF' 

DE,HL 
HL 

IX  or  lY 

HL,SP 

IX  or  IY,SP 

Exchange  program  status  with  alternate 
program  status 

Exchange  HL  with  DE 

Exchange  HL  with  top  of  stack 

Exchange  index  register  with  top  of  stack 

Load  stack  pointer  from  HL 

Load  stack  pointer  from  index  register 

Table  1-6.  Instructions  That  Use  the  Stack 

Instruction 

Function 

Call  instructions 

EX  (SP),HL 
EX  (SP),xy 
POP 
PUSH 

RETURN  instructions 
RST 

Jump  and  save  program  counter  in  stack  (including 
conditionals) 

Exchange  HL  with  top  of  stack 

Exchange  index  register  with  top  of  stack 

Load  register  pair  from  stack 

Store  register  pair  in  stack 

Load  program  counter  from  stack  (including 
conditionals) 

Jump  to  vector  address  and  save  program 
counter  in  stack 

We  may  describe  the  special  features  of  particular  registers  as  follows: 

•  Accumulator.  Only  single  register  that  can  be  loaded  or  stored  directly.  Only  8-bit 
register  that  can  be  shifted  with  a  one-byte  instruction.  Only  register  that  can  be 
complemented,  decimal  adjusted,  or  negated  with  a  single  instruction.  Only  register 
that  can  be  loaded  or  stored  using  the  addresses  in  register  pairs  BC  or  DE.  Only 
register  that  can  be  stored  in  an  output  port  or  loaded  from  an  input  port  using  direct 
addressing.  Source  and  destination  for  all  8-bit  arithmetic  and  logical  instructions 
except  DEC  and  INC.  Only  register  that  can  be  transferred  to  or  from  the  interrupt 
vector  (I)  or  refresh  (R)  register. 

•  Register  pair  HL.  Only  register  pair  that  can  be  used  indirectly  in  the  instructions 
ADC,  ADD,  AND,  CMP,  DEC,  INC,  OR,  SBC,  SUB,  and  XOR.  Source  and 
destination  for  the  instructions  ADC  HL,  ADD  HL,  and  SBC  HL.  Only  register  pair 
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that  can  be  exchanged  with  register  pair  DE  or  with  the  top  of  the  stack.  Only  register 
pair  that  can  have  its  contents  moved  to  the  stack  pointer  (LD  SP,HL)  or  the  program 
counter  (JP  (HL)).  Only  register  pair  that  can  be  shifted  with  a  single  instruction 
(ADD  HL,HL).  Automatically  used  as  a  source  address  register  in  block  move,  block 
compare,  and  block  output  instructions.  Automatically  used  as  a  destination  address 
register  in  block  input  instructions. 

•  Register  pair  DE.  Only  register  pair  that  can  exchanged  with  HL  (EX  DE,HL). 
Automatically  used  as  a  destination  address  register  in  block  move  instructions. 

■  Register  pair  BC.  Automatically  used  as  a  counter  in  block  move  and  block 
compare  instructions. 

■  Register  B.  Automatically  used  as  a  counter  in  the  DJNZ  instruction  and  in  block 
input  and  output  instructions. 

•  Register  C.  Only  register  that  can  be  used  as  an  indirect  port  address  for  input  and 
output.  Automatically  used  as  a  port  address  in  block  input  and  output  instructions. 

•  Index  registers  IX  and  lY.  Only  address  registers  that  allow  an  indexed  offset. 
Used  as  source  and  destination  in  ADD  xy  instruction.  Can  be  exchanged  with  the  top 
of  the  stack,  moved  to  the  stack  pointer  or  program  counter,  or  shifted  with  ADD 
xy,xy. 

■  Stack  pointer.  Automatically  postincremented  by  instructions  that  load  data  from 
the  stack  and  predecremented  by  instructions  that  store  data  in  the  stack.  Only  address 
register  that  can  be  used  to  transfer  other  register  pairs  to  or  from  memory  (PUSH  and 
POP)  or  to  transfer  the  program  counter  to  or  from  memory  (CALL  instructions  and 
RETURN  instructions). 

Note  the  following: 

•  The  A  register  is  the  only  8-bit  register  that  can  be  loaded  from  memory  or  stored 
in  memory  using  direct  addressing. 

•  Only  the  address  in  register  pair  HL  or  an  address  obtained  via  indexing  can  be 
used  in  operations  other  than  loading  and  storing  the  accumulator.  That  is,  only  the 
data  at  the  address  in  HL  or  at  an  indexed  address  can  be  moved  to  or  from  a  user 
register,  decremented,  incremented,  or  used  in  arithmetic  and  logical  operations. 

•  Only  DEC  reg  and  INC  reg  perform  8-bit  arithmetic  operations  without  involving 
the  accumulator  (of  course,  DEC  and  INC  may  be  applied  to  the  accumulator). 

•  Only  index  registers  IX  and  lY  allow  an  offset  from  a  base  address.  The  data  at  the 
indexed  address  can  be  used  like  the  data  at  the  address  in  HL. 

•  The  index  registers  IX  and  lY  make  useful  backups  to  HL  because  of  the 
availability  of  the  16-bit  instructions  ADD  xy;  EX  (SP),xy;  JP  (xy);  and  LD  SP,xy. 
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Register  Transfers 

The  LD  instruction  can  transfer  any  8-bit  general-purpose  register  ( A,  B,  C,  D,  E,  H, 
or  L)  to  any  other  8-bit  general-purpose  register.  The  flag  (F)  register  can  only  be 
transferred  to  or  from  the  stack  along  with  the  accumulator  (PUSH  AF  and  POP  AF). 
Register  pairs  DE  and  HL  can  be  exchanged  using  EX  DE,HL. 

The  common  transfer  instructions  are 

•  LD  A.reg  transfers  the  contents  of  reg  to  the  accumulator 

•  LD  reg,A  transfers  the  contents  of  the  accumulator  to  reg 

•  LD  reg,(HL)  loads  reg  with  the  contents  of  the  memory  address  in  register  pair  HL 

•  LD  (HL),reg  stores  reg  at  the  memory  address  in  register  pair  HL 

•  EX  DE,HL  exchanges  register  pair  DE  with  HL. 

The  destination  always  comes  first  in  the  operand  field  of  LD.  That  is,  LD  regl,reg2 
transfers  the  contents  of  reg2  to  regl ,  the  opposite  of  the  convention  proposed  in  IEEE 
Standard  694  for  assembly  language  instructions. ^  The  LD  changes  the  destination, 
but  leaves  the  source  as  it  was.  Note  that  EX  DE,HL  changes  all  four  registers  (D,  E, 
H,  and  L);  it  is  thus  equivalent  to  four  LDs  plus  some  intermediate  steps  that  save  one 
byte  of  data  while  transferring  another. 


LOADING  REGISTERS  FROM  MEiyiORY 

The  Z80  microprocessor  has  five  addressing  modes  that  can  be  used  to  load  registers 
from  memory.  These  addressing  modes  are:  Direct  (from  a  specific  memory  address). 
Immediate  (with  a  specific  value).  Indirect  (from  an  address  stored  in  a  register  pair), 
Indexed  (from  an  address  obtained  by  adding  a  fixed  offset  to  an  index  register),  and 
Stack  (from  the  top  of  the  stack).' 

Direct  Loodfng  of  Registers 

The  accumulator,  a  primary  register  pair  (BC,  DE,  or  HL),  the  stack  pointer,  or  an 
index  register  can  be  loaded  from  memory  using  direct  addressing. 

Examples 

1.  LD  A,(2050H) 

This  instruction  loads  the  accumulator  (register  A)  from  memory  location  2050  jg. 
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2.  LD  HL,(OAOOOH) 

This  instruction  loads  register  L  from  memory  location  AOOO  i6  and  register  H  from 
memory  location.  AOOlig  Note  the  standard  Z80  practice  of  storing  16-bit  numbers 
with  the  less  significant  byte  at  the  lower  address,  followed  by  the  more  significant  byte. 

3.  LD  SP,(9A12H) 

This  instruction  loads  the  stack  pointer  from  memory  locations  9  A 12 16  (less  signifi- 
cant byte)  and  9A13i6  (more  significant  byte). 

Immediate  Loading  of  Registers 

Immediate  addressing  can  be  used  to  load  any  register,  register  pair,  or  index  register 
with  a  specific  value.  The  register  pairs  include  the  stack  pointer. 

Examples 

1.  LDC,6 

This  instruction  loads  register  C  with  the  number  6.  The  6  is  an  8-bit  data  item,  not  a 
16-bit  address.  Do  not  confuse  the  number  6  with  the  address  0006 16. 

2.  LD  DE,15E3H 

This  instruction  loads  register  D  with  15 16  and  register  E  with  E3i6. 

3.  LD  IY,0B7EEH 

This  instruction  loads  index  register  lY  with  BTEEig. 

Indireel  loading  of  Registers 

The  instruction  LD  reg,(HL)  can  load  any  register  from  the  address  in  register  pair 
HL.  The  instruction  LD  A,(rp)  can  load  the  accumulator  using  the  address  in  a  register 
pair  (BC,  DE,  or  HL).  Note  that  there  is  no  instruction  that  loads  a  register  pair 
indirectly. 

Examples 

1.  LDD,(HL) 

This  instruction  loads  register  D  from  the  memory  address  in  register  pair  HL.  The 
assembly  language  instruction  takes  the  form  "LD  destination  register,  source  regis- 
ter"; the  order  of  the  operands  is  the  opposite  of  that  proposed  for  IEEE  Standard 
694.'» 
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2.  LD  A,(BC) 

This  instruction  loads  the  accumulator  from  the  memory  address  in  register  pair 
BC.  Note  that  you  cannot  load  any  register  except  A  using  BC  or  DE  indirectly. 

Indexed  Loading  of  Registers 

The  instruction  LD  A,(xy+OFFSE T)  loads  the  accumulator  from  the  indexed 
address  obtained  by  adding  the  8-bit  number  OFFSET  to  the  contents  of  an  index 
register.  Note  that  OFFSET  is  a  fixed  8-bit  number  (its  value  is  part  of  the  program), 
while  the  index  register  contains  a  16-bit  address  that  can  be  changed. 5  If  OFFSET  =  0, 
indexing  is  equivalent  to  indirection,  but  it  is  slower  since  the  processor  still  must 
perform  the  address  addition. 

Stacic  Loading  of  Registers 

The  instruction  POP  rp  or  POP  xy  loads  a  register  pair  or  an  index  register  from  the 
top  of  the  stack  and  adjusts  the  stack  pointer  appropriately.  One  register  pair  for  POP 
rp  is  AF,  which  consists  of  the  accumulator  (more  significant  byte)  and  the  flags  (less 
significant  byte).  No  instructions  load  8-bit  registers  from  the  stack  or  use  the  stack 
pointer  indirectly  without  changing  it  (although  EX  (SP),HL  and  EX  (SP),xy  have  no 
net  effect  on  the  stack  pointer  since  they  transfer  data  both  to  and  from  the  stack). 

Examples 

1.  POPDE 

This  instruction  loads  register  pair  DE  from  the  top  of  the  stack  and  increments  the 
stack  pointer  by  2.  Register  E  is  loaded  first. 

2.  FOPIY 

This  instruction  loads  index  register  I Y  from  the  top  of  the  stack  and  increments  the 
stack  pointer  by  2.  The  less  significant  byte  of  lY  is  loaded  first. 
The  stack  has  the  following  special  features: 

•  The  stack  pointer  contains  the  address  of  the  most  recently  occupied  location. 
The  stack  can  be  anywhere  in  memory. 

■  Data  is  stored  in  the  stack  using  predecrementing — the  instructions  decrement 
the  stack  pointer  by  1  before  storing  each  byte.  Data  is  loaded  from  the  stack  using 
postincrementing — the  instructions  increment  the  stack  pointer  by  1  after  loading 
each  byte. 

■  As  is  typical  with  microprocessors,  there  are  no  overflow  or  underflow 
indicators. 
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STORING  REGISTERS  IN  MEMORY 

The  Z80  has  four  addressing  modes  that  can  be  used  to  store  registers  in  memory. 
These  modes  are:  Direct  (at  a  specific  memory  address),  Indirect  (at  an  address  stored 
in  a  register  pair),  Indexed  (at  an  address  calculated  by  adding  an  8-bit  offset  to  the 
contents  of  an  index  register),  and  Stack  (at  the  top  of  the  stack). 

Direct  Storage  of  Registers 

Direct  addressing  can  be  used  to  store  the  accumulator,  a  register  pair  (BC,  DE,  or 
HL),  the  stack  pointer,  or  an  index  register. 

Examples 

1.  LD(35C8H),A 

This  instruction  stores  the  accumulator  in  memory  location  35C8i6. 

2.  LD(203AH),HL 

This  instruction  stores  register  L  in  memory  location  203 A 15  and  register  H  in 
memory  location  203Bi6. 

3.  LD  (0A57BH),SP 

This  instruction  stores  the  stack  pointer  in  memory  locations  A57Bi6  (less  signifi- 
cant byte)  and  A57Ci6  (more  significant  byte). 

Indirect  Storage  of  Registers 

The  instruction  LD  (HL),reg  can  store  any  register  at  the  address  in  register  pair 
HL.  The  instruction  LD  (rp),A  can  store  the  accumulator  at  the  address  in  a  register 
pair  (BC,  DE,  or  HL).  Note  that  there  is  no  instruction  that  stores  a  register  pair 
indirectly. 

Examples 

1.  LD  (HL),C 

This  instruction  stores  register  C  at  the  address  in  register  pair  HL.  The  form  is 
"move  to  address  in  HL  from  C." 

2.  LD(DE),A 

This  instruction  stores  the  accumulator  at  the  memory  address  in  register  pair  DE. 
Note  that  you  cannot  store  any  register  except  A  using  BC  or  DE  indirectly. 
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Indexed  Storage  of  Registers 

The  instruction  LD  (xy+OFFSET),A  stores  the  accumulator  at  the  indexed  address 
obtained  by  adding  the  8-bit  number  OFFSET  to  the  contents  of  an  index  register.  If 
OFFSET  =  0,  the  indexed  address  is  simply  the  contents  of  the  index  register,  and 
indexing  is  reduced  to  a  slow  version  of  indirect  addressing. 

Stack  Storage  of  Registers 

The  instruction  PUSH  rp  or  PUSH  xy  stores  a  register  pair  or  an  index  register  at 
the  top  of  the  stack  and  adjusts  the  stack  pointer  appropriately.  One  register  pair  is  AF, 
consisting  of  the  accumulator  (more  significant  byte)  and  the  flags  (less  significant 
byte).  There  is  no  instruction  that  stores  an  8-bit  register  in  the  stack. 

Examples 

1.  PUSH  BC 

This  instruction  stores  register  pair  BC  at  the  top  of  the  stack  and  decrements  the 
stack  pointer  by  2.  Note  that  B  is  stored  first,  so  C  ends  up  at  the  top  of  the  stack. 

2.  PUSH  IX 

This  instruction  stores  index  register  IX  at  the  top  of  the  stack  and  decrements  the 
stack  pointer  by  2.  Note  that  the  less  significant  byte  of  IX  is  stored  last,  and  thus  it 
ends  up  at  the  top  of  the  stack. 


Omm  LOADING  AI^D  STORING  OPERATIONS 

Other  loading  and  storing  operations  require  more  than  one  instruction.  Some 
typical  examples  are 

1 .    Direct  loading  of  a  register  other  than  A. 

LD      A, (ADDR) 
LD  reg,A 

An  alternative  is 

LD  HL,ADDR 
LD  reg,(HL.i 

The  second  approach  leaves  A  unchanged,  but  makes  HL  an  indirect  addressing  pair. 
Of  course,  the  address  in  HL  would  then  be  available  for  later  use. 
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2.  Indirect  loading  of  a  register  (from  the  address  in  memory  locations  INDIR  and 
INDIR+l). 

LD      HL, (INDIR)  ;GET  INDIRECT  ADDRESS 

LD      reg,(HL)  jLOAD  DATA  INDIRECTLY 

3.  Direct  storage  of  a  register  other  than  A. 

LD  A,re9 
LD  (ADDR),A 

An  alternative  is 

LD  HL,ADDR 
LD  (HD.reg 


4.  Indirect  storage  of  a  register  (at  the  address  in  memory  locations  INDIR  and 
INDIR+1). 

LD      HL,C  INDIR.)  ;  GET  THE  INDIRECT  ADDRESS 

LD       (HL),reg  5  STORE  DATA  THERE 


STORING  VALUES  IN  RAM 


The  usual  ways  to  initialize  RAM  locations  are  (1)  through  the  accumulator,  (2) 
using  register  pair  HL  directly  or  indirectly,  and  (3)  using  an  index  register  with  a  fixed 
offset. 


Examples 

1.  Store  an  8-bit  item  (VALUE)  in  address  ADDR. 

LD      A, VALUE 
LD       (ADDR), A 


or 

LD  HLrADDR 
LD       (HL), VALUE 

If  VALUE  =  0,  we  could  use  SUB  A  or  XOR  A  instead  of  LD  A,  0.  Note,  however, 
that  SUB  A  or  XOR  A  affects  the  flags,  whereas  LD  A,0  does  not. 

2.  Store  a  16-bit  item  (VAL16)  in  addresses  ADDR  and  ADDR+1  (MSB  in 
ADDR+1). 


LD  HL,VAL16 
LD  (ADDR),HL 


1 6    Z80  ASSEMBLY  LANGUAGE  SUBROUTINES 


3.  Store  an  8-bit  item  (VALUE)  at  the  address  in  memory  locations  INDIR  and 
INDIR+1. 

LD      HL, (INDIR)  ;GET  INDIRECT  ADDRESS 

LD       (HL), VALUE  ; STORE  DATA  INDIRECTLY 


4.  Store  an  8-bit  item  (VALUE)  nine  bytes  beyond  the  address  in  memory  locations 
INDIR  and  INDIR-El. 

LD      A, VALUE 

LD       xy, (INDIR)  ; GET  BASE  ADDRESS 

LD       (xy+9),A  j STORE  DATA  9  BYTES  BEYOND  BASE 

Here  the  indirect  address  is  the  base  address  of  an  array  or  other  data  structure. 


AHITHMiTiC  AND  LOGICAL  OPERATIONS 

Most  arithmetic  and  logical  operations  (addition,  subtraction,  AND,  OR,  EXCLU- 
SIVE OR,  and  comparison)  can  be  performed  only  between  the  accumulator  and  an 
8-bit  register,  a  byte  of  immediate  data,  or  a  byte  of  data  in  memory  addressed  through 
register  pair  HL  or  via  indexing.  Note  that  arithmetic  and  logical  instructions  do  not 
allow  direct  addressing.  If  a  result  is  produced  (comparison  does  not  produce  any),  it 
replaces  the  operand  in  the  accumulator. 

Examples 

1 .  Logically  OR  the  accumulator  with  register  C. 

OR  c 

OR  C  logically  ORs  register  C  with  the  accumulator  and  places  the  result  in  the 
accumulator.  The  programmer  only  has  to  specify  one  operand;  the  other  operand  and 
the  destination  of  the  result  are  always  the  accumulator. 

2.  Add  register  B  to  the  accumulator. 

ADD  A,B 

ADD  A,B  adds  register  B  to  the  accumulator  (register  A)  and  places  the  result  in  the 
accumulator.  In  the  instructions  ADC,  ADD,  and  SBC,  the  programmer  must  specify 
both  operands.  The  reason  is  that  the  Z80  also  has  the  instructions  ADC  HL  (add 
register  pair  to  HL  with  carry),  ADD  HL  (add  register  pair  to  HL),  ADD  xy  (add 
register  pair  or  index  register  to  index  register),  and  SBC  HL  (subtract  register  pair 
from  HL  with  borrow).  Note  the  inconsistency  here:  Both  operands  must  be  specified 
in  ADC,  ADD,  and  SBC,  but  only  one  operand  in  SUB;  furthermore,  the  Z80  has  an 
ADD  xy  instruction,  but  no  ADC  xy  or  SBC  xy  instruction.  Since  the  16-bit  arithmetic 
instructions  are  mainly  intended  for  addressing,  we  will  discuss  them  later. 
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3.  Logically  AND  the  accumulator  with  the  binary  constant  BICON. 

AND  EICON 

Immediate  addressing  is  the  default  mode;  no  special  operation  code  or  designation  is 
necessary. 

4.  Logically  OR  the  accumulator  with  the  data  at  the  address  in  register  pair  HL. 

OR  IHL) 

Parentheses  indicate  a  reference  to  the  contents  of  a  memory  address. 

Other  operations  require  more  than  one  instruction.  Some  typical  examples  are: 
•  Add  memory  locations  OPER 1  and  OPER2,  place  sum  in  memory  location  SUM. 

LD  A,C0PER1.>  ; GET  FIRST  OPERAND 

LD  B,  A 

LD  A,  (0PER2.>  ;GET  SECOND  OPERAND 

ADD  A,B 


or 


LD       (SLIM),  A  ;SAVE  SUM 


LD  HL,0PER1 

LD  A, (HL)  ; GET  FIRST  OPERAND 

LD  HL,0PER2 

ADD  A,  (HL.)  sADD  SECOND  OPERAND 

LD  HL,SUM 

LD  (HL),A  ?SAVE  SUM 


We  can  shorten  the  second  alternative  considerably  if  the  operands  and  the  sum 
occupy  consecutive  memory  addresses.  For  example,  if  OPER2  =  OPERl  +  1  and 
SUM  =  OPER2  +  1,  we  have 


LD  HL, OPERl 

LD  A, (HL)  ;GET  FIRST  OPERAND 

INC  HL 

ADD  A,(HL)  ;ADD  SECOND  OPERAND 

INC  HL 

LD  (HL),A  sSAVE  SUM 


•  Add  a  constant  (VALUE)  to  memory  location  OPER. 


LD      A, (OPER) 
ADD     A, VALUE 
LD       (OPER), A 


LD  HL,OPER 

LD  A, (HL) 

ADD  A, VALUE 

LD  (HL),A 
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If  VALUE  =  1 ,  we  can  shorten  the  second  alternative  to 

LD  HL,OPER 
INC  CHL) 

You  can  use  DEC  (HL)  similarly  without  changing  the  accumulator,  but  both  DEC 
(HL)  and  INC  (HL)  affect  all  the  flags  except  Carry. 

BIT  MANIPUIATION 

The  Z80  has  specific  instructions  for  setting,  clearing,  or  testing  a  single  bit  in  a 
register  or  memory  location.  Other  bit  operations  require  a  series  of  single-bit  instruc- 
tions or  logical  instructions  with  appropriate  masks.  Complementing  (CPL)  applies 
only  to  the  accumulator  Chapter  7  contains  additional  examples  of  bit  manipulation. 

The  specific  bit  manipulation  instructions  are 

SET  n,reg 
RES  n,reg 
BIT  n.reg 

•  Sets  bit  n  of  register  reg 

•  Clears  bit  n  of  register  reg 

■  Tests  bit  n  of  register  reg,  setting  the  Zero  flag  if  that  bit  is  0  and  clearing  the  Zero 
flag  if  it  is  I. 

All  three  instructions  can  also  be  apphed  to  (HL)  or  to  an  indexed  address.  Note  that 
the  bit  position  is  not  a  variable;  it  is  part  of  the  instruction.^ 

Other  bit  operations  can  be  implemented  by  applying  logical  instructions  to  the 
accumulator  as  follows: 

•  Set  bits  to  I  by  logically  ORing  them  with  I's  in  the  appropriate  positions. 

•  Clear  bits  by  logically  ANDing  them  with  O's  in  the  appropriate  positions. 

•  Invert  (complement)  bits  by  logically  EXCLUSIVE  ORing  them  with  I's  in  the 
appropriate  positions. 

•  Test  bits  (for  all  O's)  by  logically  ANDing  them  with  I's  in  the  appropriate 
positions. 

This  approach  is  inconvenient  since  the  logical  instructions  can  only  be  applied  to 
the  accumulator  It  does,  however,  allow  the  programmer  to  invert  bits  and  change 
several  bits  at  the  same  time. 

Examples 

1 .  Set  bit  6  of  the  accumulator. 
SET     6, A 
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or 

OR      OlOOOOOOE  ;SET  BIT  6  BY  ORING  WITH  1 

Logically  ORing  a  bit  with  0  leaves  it  unchanged. 

2.  Clear  bit  3  of  the  accumulator 

RES    3, A 

or 

AND     111  1011  IB  ! CLEAR  BIT  3  BY  ANDING  WITH  0 

Logically  ANDing  a  bit  with  1  leaves  it  unchanged. 

3.  Invert  (complement)  bit  2  of  the  accumulator. 

XOR     OOOOOIOOB  ; INVERT  BIT  2  BY  XORING  WITH  1 

Logically  EXCLUSIVE  ORing  a  bit  with  0  leaves  it  unchanged.  Here  there  is  no 
special  bit  manipulation  instruction.  Fortunately,  setting  and  clearing  bits  are  much 
more  common  operations  than  complementing  bits. 

4.  Test  bit  5  of  the  accumulator.  In  other  words,  clear  the  Zero  flag  if  bit  5  is  1,  and 
set  it  if  bit  5  is  0. 

BIT     5, A 

or 

AND     OOlOOOOOB  ;TEST  BIT  5  BY  ANDING  WITH  1 

Note  the  inversion  here  in  either  alternative:  The  Zero  flag  is  set  to  1  if  the  bit  is  0,  and 
to  0  if  the  bit  is  1. 

5.  Set  bit  4  of  register  D. 

SET  4,D 

To  use  a  logical  function,  we  would  have  to  load  the  data  into  the  accumulator  and 
load  the  resuU  back  into  register  D. 

6.  Invert  (complement)  bit  7  of  memory  location  ADDR. 

LD      A,  (ADDR.)  ;  GET  DATA 

XOR     lOOOOOOOB  ; COMPLEMENT  BIT  7 

LD       (ADDR.), A  f RETURN  RESULT  TO  MEMORY 

7.  Set  bit  0  of  the  memory  location  five  bytes  beyond  the  address  in  INDIR  and 
INDIR+1. 

LD       xy,(ADDR)  ;GET  INDIRECT  ADDRESS 

SET     0, (xy+5)  jSET  BIT  0  OF  BYTE  5 
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You  can  change  more  than  one  bit  at  a  time  by  using  a  series  of  bit  manipulation 
instructions  or  by  using  the  logical  functions  with  appropriate  masks. 

8.  Set  bits  4  and  5  of  the  accumulator. 

OR  OOllOOOOE  ;SET  BITS  4  AND  5  BY  ORING  WITH  1 

or 

SET  4, A  ;SET  BIT  4  FIRST 

SET  5, A  ;AND  THEN  SET  BIT  5 

9.  Invert  (complement)  bits  0  and  7  of  the  accumulator. 

XOR     1000000 IB  ; INVERT  BITS  0  AND  7  BY  XORING  WITH  1 

A  handy  shortcut  to  change  bit  0  of  a  register  or  memory  location  is  to  use  INC  to  set 
it  (if  you  know  that  it  is  0)  and  DEC  to  clear  it  (if  you  know  that  it  is  1).  You  can  also  use 
either  INC  or  DEC  to  complement  bit  0  if  you  are  not  using  the  other  bits  of  a  register 
or  memory  location.  These  shortcuts  are  useful  when  you  are  storing  a  single  1-bit  flag 
in  a  register  or  memory  location. 

SS_1§EV  I^Hj^^^i^ 
nir  I  UtrEKAl  IvJNo 

The  Z80  has  shift  instructions  that  operate  on  any  register  or  memory  location. 
Special  instructions  apply  only  to  the  accumulator,  register  pair  HL,  or  an  index 
register.  Chapter  7  contains  further  examples  of  shift  operations. 

The  instructions  RL  and  RR  rotate  a  register  or  memory  location  and  the  Carry  flag 
as  if  they  formed  a  9-bit  register.  Figures  I-l  and  1-2  show  the  effects  ofRLandRR. 
The  instructions  RLC  and  RRC  rotate  the  register  or  memory  location  alone  as  shown 
in  Figures  1-3  and  1-4.  The  bit  shifted  off  theend  still  appears  in  the  Carry  flag  as  well 
as  in  the  bit  position  at  the  other  end.  The  instructions  SLA  and  SRL  perform  logical 
shifts  (as  shown  in  Figures  1-.5  and  1-6)  which  fill  the  bit  at  the  far  right  or  left  with  a  0. 
SRA  performs  an  arithmetic  shift  (see  Figure  1-7)  which  preserves  the  sign  bit  by 
extending  (copying)  it  to  the  right.  Note  that  RL  and  RR  preserve  the  old  Carry  flag  (in 
either  bit  0  or  bit  7),  whereas  the  other  shift  instructions  destroy  it. 

Certain  special  instructions  are  shorter  and  faster  than  the  regular  shifts  in  specific 
situations.  One-byte  circular  shifts  (RLA,  RLCA,  RRA,  RRCA)  apply  only  to  the 
accumulator.  Adding  a  register  to  itself  (ADD  A,A;  ADD  HL,HL;  ADD  xy,xy)  is 
equivalent  to  a  logical  left  shift,  while  adding  a  register  to  itself  with  Carry  (ADC  A,  A 
or  ADC  HL,HL)  is  equivalent  to  a  left  rotate  through  Carry. 

Examples 

1.  Rotate  accumulator  right  two  positions  without  the  Carry. 
RRCA 
RRCA 
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Original  contents  of  Carry  flag  and  register  or  memory  location 
Carry  Data 


«5 

•^4 

«2 

Bo 

After  RL  (rotate  left  through  Carry) 
Carry  Data 


B4 

B3 

c 

Hgure  1-1.  The  RL  (rotate  left  through  Carry)  instruction 


Original  contents  of  Carry  flag  and  register  or  memory  location 
Carry  Data 


«7 

«5 

^ 

B3 

»2 

■^0 

After  RR  (rotate  right  through  Carry) 
Carry  Data 


c 

«6 

«3 

^2 

Hgure  1-2.  The  RR  (rotate  right  through  Carry)  instruction 


Original  contents  of  Carry  flag  and  register  or  memory  location 
Carry  Data 


■^6 

B5 

B3 

After  RLC  (rotate  left) 

Carry  Data 


^6 

«5 

B3 

Hgure  1-3.  The  RLC  (rotate  left)  instruction 
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Original  contents  of  Carry  flag  and  register  or  memory  location 
Carry  Data 

C 

^ 

After  RRC  (rotate  right) 

Carry  Data 

Figure  1-4.  The  RRC  (rotate  right)  instruction 


Original  contents  of  Carry  flag  and  register  or  memory  location 


^6 

«5 

«3 

After  SLA  (siiift  left  arithmetic) 


«5 

Bo 

0 

Hgure  1-5.  The  SLA  (shift  left  arithmetic)  instruction 


Original  contents  of  Carry  flag  and  register  or  memory  location 


C 

B, 

B6 

B4 

B3 

B2 

B, 

Bo 

After  SRL  (shift  right  logical) 

Bo 

0 

B7 

B6 

B5 

B4 

B3 

Bl 

Figure  1-6.  The  SRL  (shift  right  logical)  instruction 
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Original  contents  of  Carry  flag  and  register  or  memory  location 


C 

B, 

Be 

B5 

B4 

B3 

Bj 

B, 

Bo 

After  SRA  (shift 

right  arithmetic) 

Bo 

By 

B, 

85 

B5 

B4 

B3 

B2 

B, 

Hgure  1-7.  The  SRA  (shift  right  arithmetic)  instruction 

Note  the  special  form  for  the  accumulator. 

2.  Shift  accumulator  left  logically  two  positions. 

SLA  A 
SLA  A 

A  shorter,  faster  aUernative  is 

ADD  A, A 
ADD     A, A 

The  instruction  ADD  A,A  is  equivalent  to  a  logical  left  shift  of  A.  Note  that  ADD  A,  A 
is  a  one-byte  instruction,  whereas  SLA  is  always  at  least  a  two-byte  instruction  since  it 
is  an  addition  to  the  8080  instruction  set. 

3.  Shift  register  C  right  logically  one  position. 

SRL  C 

4.  Shift  register  pair  HL  left  logically  two  positions. 

ADD  HL,HL 
ADD  HL,HL 

ADD  HL,  HL  is  a  one-byte  logical  left  shift  of  HL. 

Shift  instructions  can  also  be  applied  to  memory  locations  addressed  either  through 
register  pair  HL  or  through  indexing  from  IX  or  lY. 

5.  Shift  memory  location  ADDR  right  one  position,  preserving  the  sign  bit  (bit  7). 

LD  HL.ADDR 
SRA  (HL) 

Shifting  while  preserving  the  sign  bit  is  called  sign  extension.  A  shift  that  operates  in 
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this  manner  is  called  an  arithmetic  shift,  since  it  preserves  the  sign  of  a  two's  comple- 
ment number.  It  can  therefore  be  used  to  divide  or  normalize  signed  numbers. 

6.  Rotate  right  the  memory  location  eight  bytes  beyond  the  address  in  INDIR  and 
INDIR+1. 

LD       xy,(INDIR.l  ;  GET  INDIRECT  ADDRESS 

RR       (xy+S)  ; ROTATE  BYTE  8  RIGHT 


MAKING  DECISIONS 

In  this  section  procedures  are  presented  for  making  the  following  three  types  of 
decisions: 

•  Branching  if  a  bit  is  set  or  cleared 

•  Branching  if  two  values  are  equal  or  not  equal 

•  Branching  if  one  value  is  greater  or  less  than  another. 

The  first  type  of  decision  allows  the  processor  to  sense  the  value  of  a  flag,  switch, 
status  line,  or  other  binary  (ON/ OFF)  input.  The  second  type  of  decision  allows  the 
processor  to  determine  whether  an  input  or  a  result  has  a  specific  value  (an  input  is  a 
specific  command  character  or  terminator,  or  a  result  is  0).  The  third  type  of  decision 
allows  the  processor  to  determine  whether  a  value  is  above  or  below  a  numerical 
threshold  (a  value  is  valid  or  invalid,  or  is  above  or  below  a  warning  level  or  setpoint). 
Assuming  that  the  primary  value  is  in  the  accumulator  and  the  secondary  value  (if 
needed)  is  at  address  ADDR,  the  procedures  are  as  follows. 
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Branching  Set  or  Cleared  Bit 

Determine  if  a  bit  is  set  or  cleared  with  the  BIT  instruction.  The  operands  are  the  bit 
position  and  the  register  or  memory  address  (either  the  one  in  HL  or  one  accessed  via 
indexing).  The  Zero  flag  reflects  the  bit  value  and  can  be  used  for  branching. 

Examples 

1.  Branch  to  DEST  if  bit  5  of  the  accumulator  is  1. 

BIT     5, A 

JR      NZ , DEST 

JP  (absolute  addressing)  can  be  used  instead  of  JR  (relative  addressing).  The  Zero 
flag  is  set  to  1  if  and  only  if  bit  5  of  A  is  0. 

2.  Branch  to  DEST  if  bit  2  of  register  C  is  0. 

BIT  2,C 
JR  Z,DEST 

3.  Branch  to  DEST  if  bit  6  of  memory  location  ADDR  is  1. 

LD  HL,ADDR 
BIT  6,tHL) 
JR      NZ , DEST 

4.  Branch  to  DEST  if  bit  3  of  the  memory  location  seven  bytes  beyond  the  address 
in  INDIR  and  INDIR+1  is  0. 

LD  >!y,aNDIR.> 
BIT     3,  (xy+7.) 
JR       Z , DEST 

There  are  shortcuts  for  bits  0,  6,  and  7  of  the  accumulator. 

5.  Branch  to  DEST  if  bit  7  of  the  accumulator  is  1. 

AND     A  ; ESTABLISH  SIGN  FLAG 

JP  M,DEST 

There  is  no  relative  jump  based  on  the  Sign  flag. 

6.  Branch  to  DEST  if  bit  6  of  the  accumulator  is  0. 

ADD     A, A  ; ESTABLISH  SIGN  FLAG  FROM  BIT  6 

JP  P,DEST 


7  Branch  to  DEST  if  bit  0  of  the  accumulator  is  1 . 
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RRA  jMQVE  BIT  0  TO  CARRY 

JR  CDEST 

Here  we  have  the  choice  of  either  a  relative  or  an  absolute  jump. 


Branching  Based  on  Equality 

Determine  if  the  value  in  the  accumulator  is  equal  to  another  value  by  subtraction. 
The  Zero  flag  is  set  to  1  if  the  values  are  equal.  Compare  instructions  (CP)  are  more 
useful  than  subtract  instructions  (SBC  or  SUB)  because  compares  preserve  the  value  in 
the  accumulator  for  later  operations.  Note,  however,  that  the  Z80  has  a  16-bit  subtract 
with  borrow  instruction  (SBC  HL),  but  no  16-bit  compare  or  subtract  instruction. 

Examples 

1 .  Branch  to  DEST  if  the  accumulator  contains  the  number  VALUE. 

CP      VALUE  ;DOES  A  CONTAIN  VALUE? 

JR       Z,DEST  5 YES,  BRANCH 

2.  Branch  to  DEST  if  the  contents  of  the  accumulator  are  not  equal  to  the  contents 
of  memory  location  ADDR. 

LD  HL,ADDR 

CP       (HL)  ;IS  A  THE  SAME  AS  DATA  IN  MEMORY? 

JR      NZ,DEST  ;N0,  BRANCH 

There  are  shortcuts  if  VALUE  is  0,  1,  or  FFi6- 

3.  Branch  to  DEST  if  the  accumulator  contains  0. 

AND     A  {ESTABLISH  ZERO  FLAG 

JR       Z,DEST  ; BRANCH  IF  A  CONTAINS  ZERO 

4.  Branch  to  DEST  if  the  accumulator  does  not  contain  FFig. 

INC     A  ; ESTABLISH  ZERO  FLAG 

JR      NZ,DEST  J  BRANCH  IF  A  WAS  NOT  FF 

This  procedure  can  be  applied  to  any  8-bit  register  or  to  a  memory  location  addressed 
through  HL  or  via  indexing. 

5.  Branch  to  DEST  if  the  accumulator  contains  1. 


DEC  A 

JR      Z , DEST 


? ESTABLISH  ZERO  FLAG 
; BRANCH  IF  A  WAS  1 


CHAPTER  1  GENERAL  PROGRAMMING  METHODS  27 


6.  Branch  to  DEST  if  memory  location  ADDR  contains  0. 
LD  HL,ADDR 

INC     (HL)  {ESTABLISH  ZERO  FLAG  IN  TWO  STEPS 

DEC  (HL) 

JR       Z,DEST  ; BRANCH  IF  ADDR  CONTAINS  ZERO 

This  procedure  will  also  work  on  data  at  an  indexed  address  or  in  registers  B,  C,  D,  E, 
H,  or  L. 


7.  Branch  to  DEST  if  register  pair  HL  contains  VAL16. 

AND  A  ? CLEAR  CARRY,   DON'T  CHANGE  A 

LD  rp,VAL16 

SBC  HL,rp  ;DOES  HL  CONTAIN  VAL16? 

JR  2, DEST  J  YES,  BRANCH 

The  16-bit  subtraction  instruction  always  includes  the  Carry  and  is  available  only  for 
HL  and  another  register  pair  (BC,  DE,  or  SP). 


Bronehlng  Based  on  Magnitude  Comparisons 

Determine  if  the  value  in  the  accumulator  is  greater  than  or  less  than  some  other 
value  by  subtraction.  If,  as  is  typical,  the  values  are  unsigned,  the  Carry  flag  indicates 
which  is  larger.  In  general, 

•  Carry  =  1  if  the  value  subtracted  is  larger  than  the  value  in  the  accumulator  (that 
is,  if  a  borrow  is  required). 

•  Carry  =  0  if  the  value  in  the  accumulator  is  larger  or  if  the  two  values  are  equal. 

Since  subtracting  equal  values  makes  the  Carry  0,  the  ahernatives  (considering  the 
accumulator  as  the  primary  operand)  are 

•  Primary  operand  less  than  secondary  operand  (Carry  set) 

•  Primary  operand  greater  than  or  equal  to  secondary  operand  (Carry  cleared). 

If  the  alternatives  you  need  are  "less  than  or  equal  to"  and  "greater  than,"  you  can 
simply  exchange  the  primary  and  secondary  operands  (that  is,  from  Y  —  X  instead  of 
X-  Y). 

Examples 

1 .  Branch  to  DEST  if  the  contents  of  the  accumulator  are  greater  than  or  equal  to 
the  number  VALUE. 


CP       VALUE  ;IS  A  ABOVE  VALUE? 

JR      NCDEST  ;YES,  BRANCH 
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2.  Branch  to  DEST  if  the  contents  of  memory  address  OPERl  are  less  than  the 
contents  of  memory  address  OPERl. 

LD  A, (OPERl)  ; GET  FIRST  OPERAND 

LD  HL,0PER2 

CP  (HL)  ;IS  IT  LESS  THAN  SECOND  OPERAND? 

JR  C,DEST  fYES,  BRANCH 

3.  Branch  to  DEST  if  the  contents  of  memory  address  OPERl  are  less  than  or  equal 
to  the  contents  of  memory  address  0PER2. 

LD  A,tOPER2)  J  GET  SECOND  OPERAND 

LD  HL, OPERl 

CP  <HL)  ;IS  IT  GREATER  THAN  OR  EQUAL  TO  FIRST? 

JR  NCDEST  !YES,  BRANCH 

If  we  loaded  the  accumulator  with  OPERl  and  compared  to  OPER2,  we  could 
branch  only  on  the  conditions 

•  OPERl  greater  than  or  equal  to  OPER2  (Carry  cleared) 

■  OPERl  less  than  OPER2  (Carry  set). 

Since  neither  is  what  we  want,  we  must  reverse  the  order  in  which  the  operands  are 
handled. 

4.  Branch  to  DEST  if  the  contents  of  register  pair  HL  are  greater  than  or  equal  to 
VAL16. 

AND    A  ; CLEAR  CARRY 

LD      rp,VAL16  ; IS  HL  ABOVE  VAL16? 

SBC  HL,rp 

JR      NCDEST  J  YES,  BRANCH 

If  the  values  are  signed,  we  must  allow  for  the  possible  occurrence  of  two's  comple- 
ment overflow.'  This  is  the  situation  in  which  the  difference  between  the  numbers 
cannot  be  contained  in  seven  bits  and,  therefore,  the  sign  bit  is  changed.  For  example, 
if  one  number  is  +7  and  the  other  is  -125,  the  difference  is  -132,  which  is  beyond  the 
capacity  of  eight  bits  (it  is  less  than  - 128,  the  most  negative  number  that  eight  bits  can 
hold). 

If  overflow  is  a  possibility,  we  can  determine  if  it  occurred  by  examining  the 
Parity/  Overflow  flag  after  the  addition  or  subtraction  instruction.  If  that  flag  is  I , 
overflow  did  occur  The  mnemonics  here  are  confusing,  since  the  Parity/  Overflow  flag 
normally  indicates  whether  the  result  has  even  parity;  the  branches  are  therefore  PE 
(Parity  Even  or  Overflow  Set)  and  PO  (Parity  Odd  or  Overflow  Clear).  Weller  clarifies 
the  situation  by  defining  additional  mnemonics  JV  and  JNV.** 

Thus,  in  the  case  of  signed  numbers,  we  must  allow  for  the  following  possibilities: 

■  The  result  has  the  sign  (positive  or  negative,  as  shown  by  the  Sign  flag)  that  we 
want,  and  the  Parity/ Overflow  flag  indicates  that  the  sign  is  valid. 
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•  The  result  does  not  have  the  sign  that  we  want,  but  the  Parity/ Overflow  flag 
indicates  that  two's  complement  overflow  has  changed  the  real  sign. 

We  have  to  look  for  both  a  true  positive  (the  sign  we  want,  unaffected  by  overflow) 
or  a  false  negative  (the  opposite  of  the  sign  we  want,  but  inverted  by  two's  complement 
overflow). 


Examples 

1.  Branch  to  DEST  if  the  accumulator  contains  a  signed  number  greater  than  or 
equal  to  the  number  VALUE. 


FNEO: 
DONE: 


CP 
JP 
JP 
JR 
JP 
NOP 


VALUE 

PE,FNEC 

PrDEST 

DONE 

M.DEST 


; PERFORM  THE  COMPARISON 

;DID  OVERFLOW  OCCUR? 

J  NO,   BRANCH  IF  RESULT  POSITIVE 

;YES,   BRANCH  IF  RESULT  NEGATIVE 


There  are  no  relative  jumps  based  on  the  Parity/ Overflow  flag. 

2.  Branch  to  DEST  if  the  accumulator  contains  a  signed  number  less  than  the 
contents  of  memory  address  ADDR. 

LD  HL.ADDR 

CP       (HL)  ; PERFORM  THE  COMPARISON 

JP      PE,FPOS       fDID  OVERFLOW  OCCUR? 

JP      M,DEST         ;N0,   BRANCH  IF  RESULT  NEGATIVE 

JR  DONE 

FPOS:  JP      P,DEST         ;YES,   BRANCH  IF  RESULT  POSITIVE 

DONE:  NOP 

Remember,  JP  PE  means  "jump  on  overflow,"  while  JP  PO  means  "jump  on  no 
overflow." 

The  programmer  should  also  note  that  this  is  one  of  the  few  cases  in  which  the  Z80  is 
not  fully  upward-compatible  whh  the  8080  microprocessor.'  The  8080  has  no  overflow 
indicator  and  the  P  flag  always  indicates  even  parity 

There  are  some  cases  in  which  overflow  cannot  occur  and  all  we  must  do  is  use  the 
Sign  flag  instead  of  the  Carry  flag  for  branching.  These  cases  are  the  following: 

•  The  two  numbers  have  the  same  sign.  When  this  occurs,  the  difference  is  smaller  in 
magnitude  than  the  larger  of  the  two  numbers  and  overflow  cannot  occur.  You  can 
easily  determine  if  two  numbers  have  the  same  sign  by  EXCLUSIVE  ORing  them 
together  and  checking  the  Sign  flag.  Remember,  the  EXCLUSIVE  OR  of  two  bits  is  1  if 
and  only  if  the  two  bits  have  different  values. 


XOR     VALUE  J  COULD  OVERFLOW  OCCUR? 

JP      P.NOOVF       jNOT  IF  SIGNS  ARE  THE  SAME 
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•  A  value  is  being  compared  with  zero.  In  this  case,  the  Sign  flag  must  be  set  and 
examined. 

Examples 

1 .  Jump  to  DEST  if  the  accumulator  contains  a  signed  positive  number. 

AND     A  ;SET  FLAGS  FROM  VALUE  IN  A 

JP  P,DEST 

2.  Jump  to  DEST  if  an  8-bit  register  contains  a  signed  negative  number. 

INC     reg  sSET  FLAGS  FROM  VALUE  IN  REGISTER 

DEC  reg 
JP  M,DEST 

This  sequence  does  not  affect  the  accumulator  or  the  register. 

3.  Jump  to  DEST  if  memory  location  ADDR  contains  a  signed  positive  number. 

LD      HL,ADDR       ; POINT  TO  DATA  IN  MEMORY 
INC  (HL) 
DEC  (HL) 

JP      P,DEST         ; BRANCH  IF  DATA  IS  POSITIVE 

This  sequence  does  not  affect  the  accumulator  or  the  memory  location. 

Tables  1-7  and  1-8  summarize  the  common  instruction  sequences  for  making 
decisions  with  the  Z80  microprocessor.  Table  1-7  lists  the  sequences  that  depend  only 
on  the  value  in  the  accumulator;  Table  1-8  lists  the  sequences  that  depend  on  numerical 
comparisons  between  the  value  in  the  accumulator  and  a  specific  number,  the  contents 
of  a  register,  or  the  contents  of  a  memory  location  (addressed  through  HL  or  an  index 
register).  Table  1-9  contains  the  sequences  that  depend  only  on  the  contents  of  a 
memory  location. 

LOOPING 

The  simplest  way  to  implement  a  loop  (that  is,  to  repeat  a  sequence  of  instructions) 
with  the  Z80  microprocessor  is  to  perform  the  following  steps: 

1.  Load  register  B  with  the  number  of  times  the  sequence  is  to  be  repeated. 

2.  Execute  the  sequence. 

3.  Use  the  DJNZ  instruction  to  decrement  register  B  and  return  to  Step  2  if  the 
result  is  not  0. 

The  DJNZ  instruction  is  useful  for  loop  control  since  it  combines  a  decrement  and  a 
conditional  relative  branch.  Note  that  DJNZ  always  operates  on  register  B  and 


CHAPTER  1  GENERAL  PROGRAMMING  METHODS  31 


Table  1-7.  Decision  Sequences  Depending  on  tlie  Accumulator  Alone 


Condition 

r  litg  kiGiLiiig  iiiairuciiufi 

Conditional  Jump 

Any  bit  =  0 

BIT  n,A 

JRZorJPZ 

Any  bit  =  1 

BIT  n,A 

JRNZorJP  NZ 

Bit  7  =  0 

RLA,  RLCA,  or  ADD  A,A 

JR  NC  or  JP  NC 

Bit  7  =  1 

RLA,  RLCA,  or  ADD  A,A 

JR  C  or  JP  C 

oil  0  —  U 

ADD  A, A 

JP  P 

Bit  6  =  1 

ADD  A,A 

JP  M 

Bit  0  =  0 

RRA  or  RRCA 

JR  NC  or  JP  NC 

Bit  0  =  1 

RRA  or  RRCA 

JR  C  or  JP  C 

Equals  zero 

AND  A  or  OR  A 

JRZorJPZ 

Not  equal  to  zero 

AND  A  or  OR  A 

JR  NZ  or  JP  NZ 

Positive  (MSB  =  0) 

AND  A  or  OR  A 

JP  P 

Negative  (MSB  =  1) 

AND  A  or  OR  A 

JP  M 

Table  1-8.  Decision  Sequences  Depending  on  Numerical  Comparisons 
with  the  Accumulator  (Using  CP) 


Condition 

Conditional  Jump 

Equal 

Not  equal 

Greater  than  or  equal  (unsigned) 
Less  than  (unsigned) 
Greater  than  or  equal  (signed) 
Less  than  (signed) 

JRZorJPZ 
JR  NZorJP  NZ 
JR  NC  or  JP  NC 
JRCorJPC 

JP  P  (assuming  no  overflow) 
JP  M  (assuming  no  overflow) 

Note:  All  conditions  assume  that  the  accumulator  contains  the  primary  operand;  for  example, 
less  than  means  "accumulator  less  than  other  operand." 

Table  1-9.  Decision  Sequences  Depending  on  a 
Memory  Location  Alone 


Condition 

Flag  Setting  Instruction(s) 

Conditional  Jump 

Any  bit  =  0 

BIT  n,  (HL)  or  (xy+OFFSET) 

JRZorJPZ 

Any  bit  =  1 

BIT  n,(HL)  or  (xy+OFFSET) 

JR  NZ  or  JP  NZ 

=  0 

INC,DEC 

JR  Z  or  JP  Z 

INC.DEC 

JR  NZ  or  JP  NZ 

32    Z80  ASSEMBLY  LANGUAGE  SUBROUTINES 


branches  if  B  is  not  decremented  to  0— the  instruction  set  does  not  provide  any  other 
combinations.  However,  DJNZ  has  limitations:  It  allows  only  an  8-bit  counter  and  an 
8-bit  offset  for  the  relative  branch  (the  branch  is  thus  limited  to  129  bytes  forward  or 
126  backward  from  the  first  byte  of  the  instruction). 
Typical  programs  look  like  the  following: 

LD      B,NTIMES  jNTIMES  =  NUMBER  OF  REPETITIONS 

LOOP: 

Instructions  to  be  repeated 


DJNZ  LOOP 

We  could,  of  course,  use  other  8-bit  registers  or  count  up  rather  than  counting  down. 
These  alternative  approaches  would  require  a  slightly  different  initialization,  an 
explicit  DEC  or  INC  instruction,  and  a  conditional  JR  or  JP  instruction.  In  any  case, 
the  instructions  to  be  repeated  must  not  interfere  with  the  counting  of  the  repetitions. 
Note  that  register  B  is  special,  and  most  programmers  reserve  it  as  a  loop  counter. 

The  8-bit  length  of  register  B  limits  this  simple  loop  to  256  repetitions.  The 
programmer  can  provide  larger  numbers  of  repetitions  by  nesting  single-register  loops 
or  by  using  a  register  pair  as  illustrated  in  the  following  examples: 


Nested  loops 


LOOPO: 
LOOP Is 


LD 
LD 


CNTIMM 
B,NTIML 


f START  OUTER  COUNTER 
; START  INNER  COUNTER 


Instructions  to  be  repeated 


DJNZ  LOOP I 
DEC  C 

JR      NZ, LOOPO 


; DECREMENT  INNER  COUNTER 
; DECREMENT  OUTER  COUNTER 


The  outer  loop  restores  the  inner  counter  (register  B)  to  its  starting  value  (NTIML) 
after  each  decrement  of  the  outer  counter  (register  C).  The  nesting  produces  a 
multiplicative  factor— the  instructions  starting  at  LOOPI  are  repeated  NTIMM  X 
NTIML  times.  We  use  register  B  as  the  inner  counter  to  take  maximum  advantage  of 
DJNZ.  (Clearly,  the  inner  loop  is  executed  many  more  times  than  the  outer  loop.) 

■  A  register  pair  as  16-bit  counter 

LD      BCNTIMES  INITIALIZE  i6-BIT  COUNTER 

LOOP: 

Instructions  to  be  repeated 


DEC  BC 

LD  A,B 

OR  C 

JR  NZ,LOOP 


STEST  16-EIT  COUNTER  FOR  ZERO 
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The  extra  steps  are  necessary  because  DEC  rp  (or  DEC  xy)  does  not  affect  the  Zero 
flag  (so  there  is  no  way  of  telling  if  the  count  has  reached  0).  The  simplest  way  to 
determine  if  a  16-bit  register  pair  contains  0  is  to  logically  OR  the  two  registers.  The 
result  of  the  logical  OR  is  0  if  and  only  if  all  bits  in  both  registers  are  O's.  Check  this 
procedure  by  hand  if  you  are  not  sure  why  it  works.  A  major  drawback  to  this 
approach  is  its  use  of  the  accumulator,  which  requires  saving  the  previous  contents  if 
they  are  needed  in  the  next  iteration. 


AURAY  MANIPULATION 

The  simplest  way  to  access  a  particular  element  of  an  array  is  to  place  the  element's 
address  in  register  pair  HL.  In  this  way,  it  is  possible  to 

•  Manipulate  the  element  by  referring  to  it  indirectly,  that  is,  as  (HL). 

•  Access  the  succeeding  element  (at  the  next  higher  address)  by  using  INC  to  incre- 
ment register  pair  HL  or  access  the  preceding  element  (at  the  next  lower  address)  by 
using  DEC  to  decrement  HL. 

•  Access  an  arbitrary  element  by  loading  another  register  pair  with  the  element's 
offset  from  the  address  in  HL  and  using  the  ADD  HL  instruction.  If  the  offset  is  fixed, 
we  can  also  use  indexing  from  a  base  address  in  either  index  register. 

Typical  array  manipulation  procedures  are  easy  to  program  if  the  array  is  one- 
dimensional  and  the  elements  each  occupy  one  byte.  Some  examples  are 

•  Add  an  element  of  an  array  to  the  accumulator.  Assume  that  the  address  of  the 
element  is  in  register  pair  HL.  Update  HL  so  that  it  contains  the  address  of  the 
succeeding  8-bit  element. 

ADD     (HL)  ;ADD  CURRENT  ELEMENT 

INC     HL  ; ADDRESS  NEXT  ELEMENT 

•  Check  to  see  if  an  element  of  an  array  is  0  and  add  1  to  register  C  if  it  is.  Assume 
that  the  element's  address  is  in  register  pair  HL.  Update  HL  so  that  it  contains  the 
address  of  the  preceding  8-bit  element. 

LD  A,(HL.)  ;GET  CURRENT  ELEMENT 

AND  A  ;  IS  IT  ZERO? 

JR  NZ,UPDDT 

INC  C  ?YES,   ADD  1  TO  COUNT  OF  ZEROS 

UPDDT;         DEC  HL  ; ADDRESS  PRECEDING  ELEMENT 

•  Load  the  accumulator  with  the  35th  element  of  an  array.  Assume  that  the  base 
address  of  the  array  is  in  register  pair  HL. 

LD      DE,35  J  GET  OFFSET  FOR  REQUIRED  ELEMENT 

ADD     HL,DE  ! CALCULATE  ADDRESS  OF  ELEMENT 

LD      A, (HL)  J  OBTAIN  THE  ELEMENT 
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ADD  HL,DE  performs  a  16-bit  addition,  using  register  pair  HL  as  a  16-bit  accumu- 
lator. Note  that  the  16-bit  offset  in  register  pair  DE  can  be  either  positive  or  negative. 

The  following  single  instruction  performs  the  same  task  if  the  offset  is  an  8-bit 
unsigned  number  and  the  base  address  is  in  an  index  register: 

LD      A,(xy+35.>   ; OBTAIN  THE  ELEMENT  IN  ONE  STEP 

Manipulating  array  elements  becomes  more  difficult  if  more  than  one  element  is 
needed  during  each  iteration  (as  in  a  sort  that  requires  interchanging  of  elements),  if 
the  elements  are  more  than  one  byte  long,  or  if  the  elements  are  themselves  addresses 
(as  in  a  table  of  starting  addresses).  The  basic  problems  are  the  lack  of  indexing  with  a 
variable  offset  and  the  lack  of  instructions  that  access  16-bit  items  indirectly.  Some 
examples  of  more  general  array  manipulation  are 

■  Load  register  pair  DE  with  a  16-bit  element  of  an  array  (stored  LSB  first).  The 
starting  address  of  the  element  is  in  register  pair  HL.  Update  HL  so  that  it  points  to  the 
next  16-bit  element. 

;GET  LSB  OF  ELEMENT 


LD  E, (HL) 

INC  HL 

LD  D,(HL) 

INC  HL 


;GET  MSB  OF  ELEMENT 
; ADDRESS  NEXT  ELEMENT 


•  Exchange  an  element  of  an  array  with  its  successor  if  the  two  are  not  already  in 
descending  order.  Assume  that  the  elements  are  8-bit  unsigned  numbers  and  that  the 
address  of  the  current  element  is  in  register  pair  HL.  Update  HL  so  that  it  contains  the 
address  of  the  successor  element. 

;GET  CURRENT  ELEMENT 

; IS  IT  LESS  THAN  SUCCESSOR? 
;N0,   NO  INTERCHANGE  NECESSARY 
;YES,   START  THE  INTERCHANGE 
; CURRENT  ELEMENT  TO  NEW  POSITION 


DONE! 


LD 

A, (HL) 

INC 

(HL) 

CP 

(HL) 

JR 

NCDONE 

LD 

E, (HL) 

LD 

(HL) , A 

DEC 

HL 

LD 

(HL) ,B 

INC 

HL 

NOP 

I  SUCCESSOR  ELEMENT  TO  NEW  POSITION 


This  procedure  is  awkward  because  the  processor  can  address  only  one  element  at  a 
time  using  HL.  Clearly,  the  problem  would  be  even  more  serious  if  the  two  elements 
were  more  than  one  position  apart. 

An  alternative  approach  is  to  use  an  index  register;  that  is, 

;GET  CURRENT  ELEMENT 
;  IS  IT  LESS  THAN  SUCCESSOR? 
;N0,   NO  INTERCHANGE  NECESSARY 
jYES,   START  THE  INTERCHANGE 
{CURRENT  ELEMENT  TO  NEW  POSITION 
; SUCCESSOR  ELEMENT  TO  NEW  POSITION 
pMOVE  ON  TO  NEXT  PAIR 


DONE: 


LD 
CP 
JR 
LD 
LD 
LD 
INC 


A,  (xy+0) 
(xy+1) 
NCDONE 

B,  (xy+0) 
(xy+1), A 
(xy+0),B 
xy 
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•  Load  the  accumulator  from  the  12th  indirect  address  in  a  table.  Assume  that  the 
base  address  of  the  table  is  in  register  pair  HL. 

LD  DE,24  ;GET  DOUBLED  OFFSET  FOR  ELEMENT 

ADD  HL,DE  ; CALCULATE  STARTING  ADDRESS  OF  ELEMENT 

LD  E, (HL)  ;GET  LSB  OF  INDIRECT  ADDRESS 

INC  HL 

LD  D,<HL)  ;GET  MSB  OF  INDIRECT  ADDRESS 

LD  A,  (DE.)  ; OBTAIN  DATA  FROM  INDIRECT  ADDRESS 

An  alternative  approach  using  an  index  register  is 

LD  A,(>5y+24)   ;GET  LSB  OF  INDIRECT  ADDRESS 

LD  E,  A 

LD  A, (xy+25)   jGET  MSB  OF  INDIRECT  ADDRESS 

LD  D,  A 

LD  A, (DE)         ! OBTAIN  DATA  FROM  INDIRECT  ADDRESS 

Note  that  in  either  approach  you  must  double  the  index  to  handle  tables  containing 
addresses,  since  each  16-bit  address  occupies  two  bytes  of  memory. 

Some  ways  to  simplify  array  processing  are 

•  Keep  the  base  address  of  the  table  or  array  in  register  pair  DE  (or  BC),  so  ADD  HL 
or  ADD  xy  does  not  destroy  it. 

•  Use  ADD  A, A  to  double  an  index  in  the  accumulator.  The  doubled  index  can  then 
be  used  to  handle  arrays  or  tables  consisting  of  16-bit  elements.  ADD  HL,HL  or  ADD 
xy,xy  may  be  used  to  double  16-bit  indexes. 

•  Use  EX  DE,HL  to  move  addresses  to  and  from  register  pair  HL. 
Chapters  5  and  9  contain  further  examples  of  array  manipulation. 


Block  Move  and  Block  Compare  Instructions 

Another  way  to  simplify  array  processing  is  to  use  the  Z80's  block  move  and  block 
compare  instructions.  The  block  move  instructions  not  only  transfer  data  from  one 
memory  location  to  another  without  using  the  accumulator,  but  they  also  update  the 
array  pointers  and  decrement  a  16-bit  loop  counter.  Thus,  a  block  move  instruction 
can  replace  a  sequence  of  load,  increment,  and  decrement  instructions.  Repeated 
block  move  instructions  continue  transferring  data,  updating  the  pointers,  and  decre- 
menting the  counter  until  the  counter  is  decremented  to  zero.  Block  compare  instruc- 
tions are  similar  to  block  moves,  except  that  only  a  single  pointer  is  involved  (the  other 
operand  is  in  the  accumulator),  and  the  repeated  versions  also  terminate  if  the 
operands  being  compared  are  equal  (this  is  referred  to  as  a  true  comparison). 

A  further  convenience  of  block  moves  and  block  compares  is  that  they  solve  the 
problem  of  testing  a  16-bit  counter  for  0.  Both  block  moves  and  block  compares  clear 
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the  Parity/ Overflow  flag  if  the  16-bit  counter  (always  in  register  pair  BC)  is  decre- 
mented to  zero,  and  set  the  Parity/ Overflow  flag  otherwise.  Note  that  the  indicator  is 
the  Parity/  Overflow  flag,  not  the  Zero  flag. 

The  block  move  and  compare  instructions  are  the  following: 

•  LDI  (LDD)  moves  a  byte  of  data  from  the  address  in  HL  to  the  address  in  DE, 
decrements  BC,  and  increments  (decrements)  DE  and  HL. 

■  LDIR  (LDDR)  repeats  LDI  (LDD)  until  BC  is  decremented  to  0. 

•  CPI  (CPD)  compares  the  accumulator  to  the  data  at  the  address  in  HL,  decre- 
ments BC,  and  increments  (decrements)  HL.  Both  CPI  and  CPD  set  the  Zero  flag  if 
the  operands  being  compared  are  equal,  and  clear  the  Zero  flag  otherwise. 

•  CPIR  (CPDR)  repeats  CPI  (CPD)  until  BC  is  decremented  to  0. 

Note  that  block  moves  reserve  BC,  DE,  and  HL  for  special  purposes,  while  block 
compares  reserve  only  BC  and  HL. 

Examples 

1.  Move  a  byte  of  data  from  memory  location  ADDRl  to  memory  location 
ADDR2. 

LD  BCl  5  NUMBER  OF  BYTES  TO  MOVE  =  1 

LD  DE, ADDRl  INITIALIZE  SOURCE  POINTER 

LD  HL,ADDR2  ; INITIALIZE  DESTINATION  POINTER 

LDI  or  LDD  ?MOVE  A  BYTE  OF  DATA 

Obviously,  the  overhead  of  loading  all  the  register  pairs  makes  it  uneconomical  to  use 
LDI  or  LDD  to  move  a  single  byte  of  data. 

2.  Move  two  bytes  of  data  from  memory  locations  ADDRl  and  ADDRl-hl  to 
memory  locations  ADDR2  and  ADDR2+1. 

LD      BC,2  ; NUMBER  OF  BYTES  TO  MOVE  =  2 

LD      DE, ADDRl  ; INITIALIZE  SOURCE  POINTER 

LD      HL,ADDR2  ; INITIALIZE  DESTINATION  POINTER 

LDIR  5 MOVE  TWO  BYTES  OF  DATA 


or 


LD      BC,2  ; NUMBER  OF  BYTES  TO  MOVE  =  2 

LD      DE,ADDR1+1  INITIALIZE  SOURCE  POINTER 

LD      HL,ADDR2+1  ; INITIALIZE  DESTINATION  POINTER 

LDDR  jMOVE  TWO  BYTES  OF  DATA 

The  block  move  instructions  become  more  useful  as  the  number  of  bytes  to  be  moved 


increases. 


CHAPTER  1  GENERAL  PROGRAMMING  METHODS  37 


3.  Move  ten  bytes  of  data  from  memory  locations  starting  at  ADDRl  to  memory 
locations  starting  at  ADDR2. 


LD     BC, 10 
LD      DE, ADDRl 
LD  HL,ADDR2 
LDIR 


NUMBER  OF  BYTES  TO  MOVE  =  10 
INITIALIZE  SOURCE  POINTER 
INITIALIZE  DESTINATION  POINTER 
MOVE  TEN  BYTES  OF  DATA 


or 


LD      BC.,10  {NUMBER  OF  BYTES  TO  MOVE  =  10 

LD      DE,ADDRl+9  ; INITIALIZE  SOURCE  POINTER 
LD      HL,ADDR2+9  {INITIALIZE  DESTINATION  POINTER 
LDDR  jMOVE  TEN  BYTES  OF  DATA 


4.  Examine  memory  locations  starting  at  ADDR  until  one  is  encountered  that 
contains  0  or  until  256  bytes  have  been  examined. 

LD      BCIOOH       ;  MAXIMUM  LENGTH  =  100  HEX  =  256 
LD      HL,ADDR       ; POINT  TO  START  OF  SEARCH  AREA 
SUB     A  ;GET  ZERO  FOR  COMPARISON 

CPIR 

The  final  value  of  the  Zero  flag  indicates  why  the  program  exited. 
Zero  flag  =  1  if  the  program  found  a  0  in  memory. 
Zero  flag  =  0  if  the  program  decremented  BC  to  0. 

The  block  move  and  block  compare  instructions  are  convenient,  but  their  forms  are 
restricted  and  their  applications  are  limited.  The  programmer  must  remember  the 
following: 

•  BC  always  serves  as  the  counter;  it  is  decremented  after  each  iteration.  The 
Parity/ Overflow  flag  (not  the  Zero  flag)  indicates  whether  BC  has  been  decremented 
to  0.  Be  careful  —  the  P  /  V  flag  is  set  to  0  if  BC  has  been  decremented  to  0;  the  polarity 
is  opposite  of  that  used  with  the  Zero  flag.  Thus,  after  a  block  move  or  block  compare, 
the  relevant  conditional  branches  have  the  following  meanings: 

JP  PE  means  "branch  if  BC  has  not  been  decremented  to  0." 
JP  PO  means  "branch  if  BC  has  been  decremented  to  0." 

•  HL  always  serves  as  the  source  pointer  in  block  moves  and  as  the  memory  pointer 
in  block  compares.  HL  is  incremented  or  decremented  after  the  data  is  transferred  or  a 
comparison  is  performed. 

•  DE  always  serves  as  the  destination  pointer  in  block  moves;  it  is  not  used  in  block 
compares.  Like  HL,  DE  is  incremented  or  decremented  after  the  data  is  transferred. 
Note  also  that  LDI  and  LDIR  increment  both  HL  and  DE,  while  LDD  and  LDDR 
decrement  both  pairs. 
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•  Repeated  block  comparisons  exit  if  either  a  true  comparison  occurs  or  BC  is 
decremented  to  0.  Testing  the  Zero  flag  will  determine  which  condition  caused  the  exit. 


TABLE  LOOKUP 

Although  the  Z80  processor  has  indexing,  the  calculations  required  for  table  lookup 
must  be  performed  explicitly  using  the  ADD  HL  or  ADD  xy  instruction.  This  is 
because  the  Z80's  indexing  assumes  a  variable  16-bit  address  in  an  index  register  and  a 
fixed  8-bit  offset.  As  with  array  manipulation,  table  lookup  is  simple  if  the  table 
consists  of  8-bit  data  items;  it  is  more  complicated  if  the  table  contains  longer  items  or 
addresses.  The  instructions  EX  DE,HL  and  JP  (HL)  or  JP  (xy)  can  be  useful,  but 
require  the  programmer  to  place  the  results  in  specific  16-bit  registers. 

Examples 

1.  Load  the  accumulator  with  an  element  from  a  table.  Assume  that  the  base 
address  of  the  table  is  BASE  (a  constant)  and  the  16-bit  index  is  in  memory  locations 
INDEX  and  INDEX+ 1  (MSB  in  INDEX-hl). 

LD  DE,BASE  ; GET  BASE  ADDRESS 

LD  HL,(INDEX.>  ;  GET  INDEX 

ADD  HL,DE  ; CALCULATE  ADDRESS  OF  ELEMENT 

LD  A, (HL>  ; OBTAIN  THE  ELEMENT 

Reversing  the  roles  of  DE  and  HL  would  slow  down  the  program  since  LD 
DE,(ADDR)  executes  more  slowly  and  occupies  more  memory  than  does  LD 
HL,(ADDR).  This  asymmetry  is  caused  by  the  fact  that  only  LD  HL,(ADDR)  is  an 
original  8080  instruction;  the  direct  loads  of  other  register  pairs  (including  the  stack 
pointer)  are  additions  to  the  underlying  8080  instruction  set. 

2.  Load  the  accumulator  with  an  element  from  a  table.  Assume  that  the  base 
address  of  the  table  is  BASE  (a  constant)  and  the  index  is  in  the  accumulator. 

LD  L,A  ; EXTEND  INDEX  TO  16  BITS  IN  HL 

LD  H,0 

LD  DE.BASE  jGET  BASE  ADDRESS 

ADD  HL,DE  ; CALCULATE  ADDRESS  OF  ELEMENT 

LD  A,(HL.l  J  OBTAIN  THE  ELEMENT 

3.  Load  register  pair  DE  with  a  16-bit  element  from  a  table.  Assume  that  the  base 
address  of  the  table  is  BASE  (a  constant)  and  the  index  is  in  the  accumulator. 

ADD    A, A  ; DOUBLE  INDEX  FOR  16-BIT  ELEMENTS 

LD      L,A  [EXTEND  INDEX  TO  16  BITS 

LD  H,0 
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LD  EC, BASE  ;GET  BASE  ADDRESS 

ADD  HL,BC  ; CALCULATE  STARTING  ADDRESS 

LD  E, (HL)  5  GET  LSB  OF  ELEMENT 

INC  HL 

LD  D,tHL)  ;GET  MSB  OF  ELEMENT 

You  can  also  use  the  instruction  ADD  HL.HL  to  double  the  index;  it  is  slower  than 
ADD  A,A  but  it  automatically  handles  cases  in  which  the  doubled  index  is  too  large 
for  8  bits. 


4.  Transfer  control  Gump)  to  a  16-bit  address  obtained  from  a  table.  Assume  that 
the  base  address  of  the  table  is  BASE  (a  constant)  and  the  index  is  in  the  accumulator. 


ADD 

A,  A 

; DOUBLE  INDEX  FOR  16-BIT  ELEMENTS 

LD 

L,A 

; EXTEND  INDEX  TO  16  BITS 

LD 

H,0 

LD 

EC, BASE 

J  GET  BASE  ADDRESS 

ADD 

HL,BC 

; CALCULATE  STARTING  ADDRESS 

LD 

E,  (HL.> 

;GET  LSB  OF  DESTINATION 

INC 

HL 

LD 

D, (HL) 

;GET  MSB  OF  DESTINATION 

EX 

DE.HL 

JP 

CHL) 

;JUMP  TO  DESTINATION 

The  common  uses  of  jump  tables  are  to  implement  CASE  statements  (multi-way 
branches  used  in  languages  such  as  FORTRAN,  Pascal,  and  PL/ 1),  to  decode  com- 
mands from  a  keyboard,  and  to  respond  to  function  keys  on  a  terminal. 


CHARACTER  MANIPULATION 

The  easiest  way  to  manipulate  characters  on  the  Z80  processor  is  to  treat  them  as 
unsigned  8-bit  numbers.  The  letters  and  digits  form  ordered  subsequences  of  the 
ASCII  character  set  (for  example,  the  ASCII  version  of  the  letter  A  is  one  less  than  the 
ASCII  version  of  B).  Appendix  C  contains  a  complete  ASCII  character  set. 

Examples 

1.  Branch  to  address  DEST  if  the  accumulator  contains  ASCII  E. 

CP       ■'£■'  ;IS  DATA  ASCII  E? 

JR        Z,DEST       J  YES,  BRANCH 

2.  Search  a  string  starting  at  address  STRNG  until  a  non-blank  character  is  found. 

LD  HL, STRNG  {POINT  TO  START  OF  STRING 

EXAMC:         LD  A, (HL)  ; GET  NEXT  CHARACTER 

CP  •'   •'  ;  IS  IT  A  BLANK? 

JR  NZ,DONE  !N0,  DONE 
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DONE! 


or 


EXAMC: 


INC  HL 
JP  EXAMC 
NOP 


LD  HL,STRNG- 

INC  HL 

LD  A,  (HL.) 

CP  •'  ■' 

JR  Z, EXAMC 


;YES,   PROCEED  TO  NEXT  CHARACTER 


1   ! POINT  TO  BYTE  BEFORE  STRING 


jGET  NEXT  CHARACTER 
;1S  IT  A  BLANK? 
!YES,   KEEP  LOOKING 


We  could  make  either  version  execute  faster  by  placing  the  blank  character  in  a 
general-purpose  register  (for  example,  register  C)  and  comparing  each  character  with 
that  register  (using  CP  C)  rather  than  with  an  immediate  data  value. 

We  could  also  use  the  block  compare  instructions  which  combine  the  comparison 
and  the  incrementing  of  the  pointer  in  HL.  The  CPI  instruction,  for  example,  not  only 
compares  the  accumulator  with  the  data  at  the  address  in  HL,  but  also  increments  HL 
and  decrements  BC.  Thus,  the  program  using  CPI  is 

LD  HL.STRNG  ; POINT  TO  START  OF  STRING 

LD  A,  '   ■'  ;GET  A  BLANK  FOR  COMPARISON 

EXAMC:         CPI  ; IS  NEXT  CHARACTER  A  BLANK? 

JR  Z, EXAMC  fYES,   KEEP  LOOKING 

The  CPI  instruction  sets  the  Zero  flag  to  1  if  the  operands  being  compared  are  equal 
and  to  0  if  they  are  not  equal.  It  also  sets  the  Parity  /  Overflow  flag  to  0  if  it  decrements 
BC  to  0  and  to  1  if  it  does  not,  thus  allowing  the  programmer  to  check  easily  for  the 
termination  of  the  string  as  well  as  for  a  true  comparison.  We  cannot  use  CPIR  here, 
since  it  would  terminate  as  soon  as  a  blank  character  (rather  than  a  non-blank 
character)  was  found. 


3.  Branch  to  address  DEST  if  the  accumulator  contains  a  letter  between  C  and  F, 
inclusive. 

CP       'C  ;IS  DATA  BELOW  C? 

JR      CDONE         ;YES,  DONE 
CP       'G'  nIS  DATA  BELOW  0? 

JR      CDEST         ;YES,   MUST  BE  BETWEEN  C  AND  F 
DONE:  NOP 

We  have  taken  advantage  of  the  fact  that  G  follows  F  numerically  in  ASCII,  just 
as  it  does  in  the  alphabet.  Chapter  8  contains  further  examples  of  string  manipulation. 


CODE  COMVERSiON 


You  can  convert  data  from  one  code  to  another  using  arithmetic  or  logical  opera- 
tions (if  the  relationship  is  simple)  or  lookup  tables  (if  the  relationship  is  complex). 
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Examples 

1.  Convert  an  ASCII  digit  to  its  binary-coded  decimal  (BCD)  equivalent. 

SUB       O'  ; CONVERT  ASCII  TO  BCD 

Since  the  ASCII  digits  form  an  ordered  subsequence  of  the  code,  all  that  must  be  done 
is  subtract  the  offset  (ASCII  0). 

You  can  also  clear  bits  4  and  5  with  the  instruction 

AND     nOOlUlB  ;  CONVERT  ASCII  TO  BCD 

Either  the  arithmetic  instruction  or  the  logical  instruction  will  convert  ASCII  0  (30i6) 
to  decimal  0  (OOie). 

2.  Convert  a  binary-coded-decimal  (BCD)  digit  to  its  ASCII  equivalent. 

ADD     A,'0'  ; CONVERT  BCD  TO  ASCII 

The  inverse  conversion  is  equally  simple.  Bits  4  and  5  can  be  set  with  the  instruction 

OR      OOllOOOOB  ; CONVERT  BCD  TO  ASCII 

Either  the  arithmetic  instruction  or  the  logical  instruction  will  convert  decimal  6  (06i6) 
to  ASCII  6  (36,6). 

3.  Convert  one  8-bit  code  to  another  using  a  lookup  table.  Assume  that  the  lookup 
table  starts  at  address  NEWCD  and  is  indexed  by  the  value  in  the  original  code  (for 
example,  the  27th  entry  is  the  value  in  the  new  code  corresponding  to  27  in  the  original 
code).  Assume  that  the  data  is  in  memory  location  CODE. 


LD 

A,  (CODE.* 

;GET  THE  OLD  CODE 

LD 

L,  A 

; EXTEND  INDEX  TO  16  BITS 

LD 

H,0 

LD 

DE, NEWCD 

;GET  BASE  ADDRESS 

ADD 

HL,DE 

; CALCULATE  ADDRESS  OF  ELEMENT 

LD 

A,  (HL.> 

;GET  THE  ELEMENT 

Indexed  addressing  cannot  be  used  here,  since  memory  location  CODE  contains  a 
variable  value. 

Chapter  4  contains  further  examples  of  code  conversion. 

MULTIPLE-PRECISION  ARITHMETIC 

Multiple-precision  arithmetic  requires  a  series  of  8-bit  operations.  They  are 

•  Clear  the  Carry  flag  initially,  since  there  is  never  a  carry  into  or  borrow  from  the 
least  significant  byte. 
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■  Use  the  Add  with  Carry  (ADC)  or  Subtract  with  Carry  (SBC)  instruction  to 
perform  an  8-bit  operation  and  include  the  carry  or  borrow  from  the  previous 
operation. 

A  typical  64-bit  addition  program  is 


ADDS: 


LD 

B,8 

! NUMBER  OF  BYTES  =  8 

SUE 

A 

; CLEAR  CARRY  INITIALLY 

LD 

HL.NUMl 

; POINT  TO  START  OF  NUMBERS 

LD 

DE,NUM2 

LD 

A, (DE) 

?GET  A  BYTE  OF  ONE  OPERAND 

ADC 

A, (HL) 

?ADD  A  BYTE  OF  THE  OTHER  OPERAND 

LD 

(HL) , A 

; STORE  THE  8-BIT  SUM 

INC 

DE 

; UPDATE  POINTERS 

INC 

HL 

DJNZ 

ADDS 

; COUNT  BYTE  OPERATIONS 

Chapter  6  contains  further  examples. 


MULTiPUCATiON  AND  DIVISION 

There  are  many  ways  to  implement  multiplication.  One  approach  is  to  convert 
multiplication  by  a  small  integer  into  a  specific  short  sequence  of  additions  and  left 
shifts. 

Examples 

1.  Multiply  the  contents  of  the  accumulator  by  2. 

ADD     A, A  F DOUBLE  A 

2.  Multiply  the  contents  of  the  accumulator  by  5. 

LD  B,  A 

ADD  A, A  ;A  TIMES  2 

ADD  A, A  !A  TIMES  4 

ADD  A,B  !A  TIMES  5 

Both  examples  assume  that  no  carries  ever  occur.  ADD  HL  could  be  similarly  used 
to  produce  a  16-bit  result. 

This  approach  is  often  handy  in  accessing  elements  of  two-dimensional  arrays.  For 
example,  assume  a  set  of  temperature  readings  taken  at  four  different  positions  in  each 
of  three  different  storage  tanks.  Organize  the  readings  as  a  two-dimensional  array 
T(I,J),  where  I  is  the  tank  number  (1 , 2,  or  3)  and  J  identifies  the  position  in  the  tank  (1 , 
2,  3,  or  4).  Store  the  reading  in  the  computer's  memory  one  after  another  as  follows, 
starting  with  the  reading  at  position  1  of  tank  1 : 


EASE 

BASE+1 

BASE+2 


T  ( 1 ,  1 ) 
T(l,2) 
T(l,3.) 


Reading  at  tank  1,  position  1 
Reading  at  tank  1,  position  2 
Reading  at  tank  1,  position  3 
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BASE+3 

T(l,4> 

Reading 

at 

tank 

1, 

posit  ion 

4 

BASE+4 

T(2, 1) 

Reading 

at 

tank 

2, 

position 

1 

BASE+5 

T(2,2) 

Reading 

at 

tank 

2 

posit  ion 

2 

EASE+6 

T(2,3.) 

Reading 

at 

tank 

2, 

posit  ion 

3 

BASE+7 

T(2,4) 

Reading 

at 

tank 

2, 

posit  ion 

4 

BASE+8 

T(3,  1.1 

Reading 

at 

tank 

3, 

posit  ion 

1 

BASE +9 

T(3,2.1 

Reading 

at 

tank 

3, 

position 

2 

BASE+10 

T(3,3.1 

Reading 

at 

tank 

3, 

posit  ion 

3 

BASE+11 

T(3,4.> 

Read  ing 

at 

tank 

3, 

pos  i  t  ion 

4 

Generally,  the  reading  T(I,  J)  is  located  at  address  BASE  +  4  *  (I- 1 )  +  (J- 1 ).  If  I  is  in 
the  accumulator  and  J  is  in  register  B,  the  accumulator  can  be  loaded  with  T(I,J)  as 
follows: 


DEC 

A 

; OFFSET  FOR  TANK  I 

ADD 

A,  A 

;2  «  (I-l.) 

ADD 

A,  A 

;4  «  (I-l) 

ADD 

A,B 

;ADD  OFFSET  FOR  POSITION  J 

DEC 

A 

J  4  «  (I-l)  +  (J-1) 

LD 

L,A 

; EXTEND  INDEX  TO  16  BITS 

LD 

H,0 

LD 

DE,BASE 

;GET  BASE  ADDRESS  OF  READINGS 

ADD 

HL,DE 

J  ACCESS  DESIRED  READING 

LD 

A, (HL) 

; FETCH  T(I,J) 

Extending  this  approach  to  handle  arrays  with  more  dimensions  is  shown  in 
Chapter  5. 

Division  by  a  power  of  2  can  be  implemented  as  a  series  of  right  logical  shifts. 
Example 

Divide  the  contents  of  the  accumulator  by  4. 

SRL     A  ; DIVIDE  A  BY  2 

SRL     A  ;AND  THEN  BY  2  AGAIN 


RRA  ; DIVIDE  A  BY  4  BY  ROTATING  IT  TWICE 

RRA 

AND     OOllllUB  J  MAKE  SHIFTS  LOGICAL  BY  CLEARING  MSB'S 

The  second  alternative  uses  the  one-byte  instruction  RRA,  rather  than  the  two-byte 
instruction  SRL  A.  When  multiplying  or  dividing  signed  numbers,  be  careful  to 
separate  the  signs  from  the  magnitudes.  Replace  logical  shifts  with  arithmetic  shifts 
that  preserve  the  value  of  the  sign  bit. 

Other  approaches  to  multiplication  and  division  include  algorithms  involving  shifts 
and  additions  (multiplication)  or  shifts  and  subtractions  (division)  as  described  in 
Chapter  6,  and  lookup  tables  as  discussed  previously  in  this  chapter 
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LIST  PROCESSING 

Additional  information  on  the  following  material  can  be  found  in  an  article  by  K.S. 
Shankar  published  in  IEEE  Computer. 

Lists  can  be  processed  like  arrays  if  the  elements  are  stored  in  consecutive  addresses. 
If  the  elements  are  queued  or  chained,  however,  the  limitations  of  the  instruction  set 
are  evident  because 

•  Indexed  addressing  allows  only  an  8-bit  fixed  offset. 

■  No  indirect  addressing  is  available,  except  through  register  pairs  or  index  registers. 

•  Addresses  in  register  pairs  or  index  registers  can  be  used  only  to  retrieve  or  store 
8-bit  data. 

Examples 

1 .  Retrieve  an  address  stored  starting  at  the  address  in  register  pair  HL.  Place  the 
retrieved  address  in  HL. 

LD      E,(HL)         ;GET  LSE  OF  LINK 
INC  HL 

LD      D,  (HL.>         ;GET  MSB  OF  LINK 

EX       DE,HL  ; REPLACE  CURRENT  POINTER  WITH  LINK 

This  procedure  allows  you  to  move  from  one  element  to  another  in  a  hnked  list. 

2.  Retrieve  data  from  the  address  currently  in  memory  locations  INDIR  and 
INDIR-Hl  and  increase  that  address  by  1. 

LD      HL, (INDIR); GET  POINTER  FROM  MEMORY 
LD      A, (HL)         ;GET  DATA  USING  POINTER 
INC     HL  5 UPDATE  POINTER  BY  1 

LD       (INDIR), HL 

This  procedure  allows  the  use  of  the  address  in  memory  as  a  pointer  to  the  next 
available  location  in  a  buffer. 

3.  Store  an  address  from  DE  starting  at  the  address  currently  in  register  pair  HL. 
Increment  HL  by  2. 

LD  (HL),E  jSTORE  LSB  OF  POINTER 

INC  HL 

LD  (HL),D  ; STORE  MSB  OF  POINTER 

INC  HL  J  COMPLETE  UPDATING  OF  HL 

This  procedure  allows  building  a  list  of  addresses.  Such  a  list  could  be  used,  for 
example,  to  write  threaded  code  in  which  each  routine  concludes  by  transferring 
control  to  its  successor.  The  list  could  also  contain  the  starting  addresses  of  a  series  of 
test  procedures  or  tasks  or  the  addresses  of  memory  locations  or  1/  O  devices  assigned 
by  the  operator  to  particular  functions. 
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GENERAL  DATA  STRUCTURES 

Additional  information  on  the  following  material  can  be  found  in  the  book  Data 
Structures  Using  Pascal  by  A.  Tenenbaum  and  M.  AugensteinJ '  There  are  several 
versions  of  this  book  by  the  same  authors  for  different  languages  and  computers. 

More  general  data  structures  can  be  handled  using  the  procedures  for  array  manipu- 
lation, table  lookup,  and  list  processing  that  have  been  described  earlier.  The  key 
limitations  in  the  instruction  set  are  the  same  ones  mentioned  in  the  discussion  of  hst 
processing. 


Examples 

1.  Queues  or  linked  lists.  Assume  there  is  a  queue  header  consisting  of  the  base 
address  of  the  first  element  in  memory  locations  HEAD  and  HEAD+1.  If  there  are  no 
elements  in  the  queue,  HEAD  and  HEAD+ 1  both  contain  0.  The  first  two  locations  in 
each  element  contain  the  base  address  of  the  next  element  or  0  if  there  is  no  next 
element. 

•  Add  an  element  to  the  head  of  the  queue.  Assume  that  the  element's  base  address  is 
in  DE. 


LD 

HL,HEAD 

; REPLACE  HEAD,   SAVING  OLD  VALUE 

LD 

A, <HL) 

jMOVE  LESS  SIGNIFICANT  BYTES 

LD 

(HL),E 

INC 

HL 

LD 

B, (HL) 

;MOVE  MORE  SIGNIFICANT  BYTES 

LD 

(HL),D 

LD 

(DE),A 

;NEW  HEAD  POINTS  TO  OLD  HEAD 

LD 

A,B 

; INCLUDING  MORE  SIGNIFICANT  BYTES 

INC 

DE 

LD 

(DE), A 

•  Remove  an  element  from  the  head  of  the  queue  and  set  the  Zero  flag  if  no  element 
is  available.  Place  the  base  address  of  the  element  (or  0  if  there  is  no  element)  in  DE. 


DONE! 


LD 

HL,HEAD 

; OBTAIN  HEAD  OF  QUEUE 

LD 

E, (HL) 

;LESS  SIGNIFICANT  BYTE 

INC 

HL 

LD 

D, (HL) 

J  MORE  SIGNIFICANT  BYTE 

LD 

A,D 

OR 

E 

;ANY  ELEMENTS  IN  QUEUE? 

JR 

Z , DONE 

;N0,  DONE 

INC 

DE 

;YES,   MAKE  NEXT  ELEMENT 

LD 

A, (DE) 

LD 

(HL) ,A 

;MORE  SIGNIFICANT  BYTE 

DEC 

DE 

DEC 

HL 

LD 

(DE),A 

;LESS  SIGNIFICANT  BYTE 

LD 

(HL),A 

NOP 
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Since  no  instruction  after  OR  E  affects  any  flags,  the  final  value  of  the  Zero  flag 
indicates  whether  the  queue  was  empty. 

2.  Stacks.  Assume  there  is  a  stack  structure  consisting  of  8-bit  elements.  The 
address  of  the  next  empty  location  is  in  addresses  SPTR  and  SPTR+1.  The  lowest 
address  that  the  stack  can  occupy  is  LOW  and  the  highest  address  is  HIGH.  Note  that 
this  software  stack  grows  up  in  memory  (toward  higher  addresses),  whereas  the  Z80's 
hardware  stack  grows  down  (toward  lower  addresses). 

■  If  the  stack  overflows,  set  the  Carry  flag  and  exit.  Otherwise,  store  the  accumula- 
tor in  the  stack  and  increase  the  stack  pointer  by  1 .  Overflow  means  that  the  stack  has 
expanded  beyond  its  assigned  area. 


LD 

HL,(SPTR)             ;GET  THE  STACK  POINTER 

EX 

DE,HL 

LD 

HL,-(HIGH+1.1 

CHECK  FOR  STACK  OVERFLOW 

ADD 

HL,DE 

SET  CARRY  IF  STACK  OVERFLOWS 

JR 

CDONE 

AND  EXIT  ON  OVERFLOW 

EX 

DE,HL 

GET  STACK  POINTER  BACK 

LD 

(HL) , A 

STORE  ACCUHULATOR  IN  STACK 

INC 

HL 

UPDATE  STACK  POINTER 

LD 

tSPTR),HL 

NOP 

■  If  the  stack  underflows,  set  the  Carry  flag  and  exit.  Otherwise,  decrease  the  stack 
pointer  by  1  and  load  the  accumulator  from  the  stack.  Underflow  means  that  an 
attempt  has  been  made  to  remove  data  from  an  empty  stack. 


LD 

HL,  (SPTR) 

;GET  THE  STACK  POINTER 

EX 

DE,HL 

LD 

HL,-(LOW+l.l 

; CHECK  FOR  STACK  UNDERFLOW 

ADD 

HL,DE 

; CLEAR  CARRY  IF  STACK  UNDERFLOWS 

JR 

NCDONE 

;AND  EXIT  ON  UNDERFLOW 

EX 

DE,HL 

;GET  STACK  POINTER  BACK 

DEC 

HL 

; UPDATE  STACK  POINTER 

LD 

A,  CHL.> 

sLOAD  ACCUMULATOR  FROM  STACK 

LD 

(SPTR.>,HL 

; RESTORE  STACK  POINTER 

DONE! 

CCF 

J  SET  CARRY  ON  UNDERFLOW 

Both  example  programs  utiHze  the  fact  that  ADD  HL  affects  only  the  Carry  flag. 
Remember,  ADD  HL  does  not  affect  the  Zero  flag.  Note  also  that  DEC  rp  and  INC  rp 
do  not  affect  any  flags. 


PARAMETER  PASSIHG  TECHNIQUES 

The  most  common  ways  to  pass  parameters  on  the  Z80  microprocessor  are 

1.  In  registers.  Seven  8-bit  primary  user  registers  (A,  B,  C,  D,  E,  H,  and  L)  are 
available,  and  the  three  register  pairs  (BC,  DE,  and  HL)  and  two  index  registers  (IX 
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and  lY)  may  be  used  readily  to  pass  addresses.  This  approach  is  adequate  in  simple 
cases,  but  it  lacks  generality  and  can  handle  only  a  limited  number  of  parameters.  The 
programmer  must  remember  the  normal  uses  of  the  registers  in  assigning  parameters. 
In  other  words, 

•  The  accumulator  is  the  obvious  place  to  put  a  single  8-bit  parameter. 

•  Register  pair  HL  is  the  obvious  place  to  put  a  single  address-length  (16-bit) 
parameter 

•  Register  pair  DE  is  a  better  place  to  put  a  second  address-length  parameter  than 
register  pair  BC,  because  of  the  EX  DE,HL  instruction. 

■  An  index  register  (IX  or  lY)  is  the  obvious  place  to  put  the  base  address  of  a  data 
structure  when  elements  are  available  at  fixed  offsets. 

This  approach  is  reentrant  as  long  as  the  interrupt  service  routines  save  and  restore 
all  the  registers. 

2.  In  an  assigned  area  of  memory.  There  are  two  ways  to  implement  this  approach. 
One  is  to  place  the  base  address  of  the  assigned  area  in  an  index  register.  Then 
particular  parameters  may  be  accessed  with  fixed  offsets.  The  problem  here  is  that  the 
Z80's  indexing  is  extremely  time-consuming.  An  alternative  is  to  place  the  base 
address  in  HL.  Then  parameters  must  be  retrieved  in  consecutive  order,  one  byte  at  a 
time. 

In  either  alternative,  the  calling  routine  must  store  the  parameters  in  memory  and 
load  the  starting  address  into  the  index  register  or  HL  before  transferring  control  to 
the  subroutine.  This  approach  is  general  and  can  handle  any  number  of  parameters, 
but  it  requires  a  lot  of  management.  If  different  areas  of  memory  are  assigned  for  each 
call  or  each  routine,  a  unique  stack  is  essentially  created .  If  a  common  area  of  memory 
is  used,  reentrancy  is  lost.  In  this  method,  the  programmer  is  responsible  for  assigning 
areas  of  memory,  avoiding  interference  between  routines,  and  saving  and  restoring  the 
pointers  required  to  resume  routines  after  subroutine  calls  or  interrupts. 

3.  In  program  memory  immediately  following  the  subroutine  call.  If  this  approach 
is  used,  remember  the  following: 

•  The  base  address  of  the  memory  area  is  at  the  top  of  the  stack;  that  is,  the  base 
address  is  the  normal  return  address,  the  location  of  the  instruction  immediately 
following  the  call.  The  base  address  can  be  moved  to  an  index  register  by  popping  the 
stack  with 

POP     xy  if  RETRIEVE  BASE  ADDRESS  OF  PARAMETERS 

Now  access  the  parameters  with  fixed  offsets  from  the  index  register.  For  example, 
the  accumulator  can  be  loaded  with  the  first  parameter  by  using  the  instruction 

LD      A,(xy+0)     jMOVE  FIRST  PARAMETER  TO  A 
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•  All  parameters  must  be  fixed  for  a  given  call,  since  the  program  memory  is 
typically  read-only. 

•  The  subroutine  must  calculate  the  actual  return  address  (the  address  immediately 
following  the  parameter  area)  and  place  it  on  top  of  the  stack  before  executing  a  RET 
instruction. 

Example 

Assume  that  subroutine  SUBR  requires  an  8-bit  parameter  and  a  16-bit  parameter 
Show  a  main  program  that  calls  SUBR  and  contains  the  required  parameters.  Also 
show  the  initial  part  of  the  subroutine  that  retrieves  the  parameters,  storing  the  8-bit 
item  in  the  accumulator  and  the  16-bit  item  in  register  pair  HL,  and  places  the  correct 
return  address  at  the  top  of  the  stack. 

Subroutine  call 

CALL  SUBR  ; EXECUTE  SUBROUTINE 

DEFB  PARS  jS-BIT  PARAMETER 

DEFW  PAR 16  ;16-EIT  PARAMETER 

...  next  instruction  ... 


Subroutine 
SUBR: 


POP 

xy 

! POINT  TO  START  OF  PARAMETER  AREA 

LD 

A, (xy+1) 

5  GET  LSB  OF  l'-.-EIT  PARAMETER 

LD 

E,  A 

LD 

A,  (xy+2.1 

;GET  MSB  OF  16-BIT  PARAMETER 

LD 

D,  A 

LD 

A,  (xy+O.'* 

;GET  8-EIT  PARAMETER 

LD 

BC,3 

{UPDATE  RETURN  ADDRESS 

ADD 

xy,BC 

PUSH 

>!y 

,  remainder 

of  subroutine  .    .  . 

RET 

; RETURN  TO  NEXT  INSTRUCTION 

The  initial  POP  xy  instruction  loads  the  index  register  with  the  return  address  that 
CALL  SUBR  saved  at  the  top  of  the  stack.  In  fact,  the  return  address  does  not  contain 
an  instruction;  instead,  it  contains  the  first  parameter  (PARS).  The  next  instructions 
move  the  parameters  to  their  respective  registers.  Finally,  adding  3  to  the  return 
address  and  saving  the  sum  in  the  stack  makes  the  final  RET  instruction  transfer 
control  back  to  the  instruction  following  the  parameters. 

This  approach  allows  parameter  Usts  of  any  length.  However,  obtaining  the  parame- 
ters from  memory  and  adjusting  the  return  address  is  awkward  at  best;  it  becomes  a 
longer  and  slower  process  as  the  number  of  parameters  increases. 
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4.  In  the  stack.  When  using  this  approach,  remember  the  following: 

•  CALL  stores  the  return  address  at  the  top  of  the  stack.  The  parameters  that  the 
calling  routine  placed  in  the  stack  begin  at  address  ssss  +  2,  where  ssss  is  the  contents  of 
the  stack  pointer.  The  16-bit  return  address  occupies  the  top  two  locations  of  the  stack, 
and  the  stack  pointer  itself  always  refers  to  the  lowest  occupied  address,  not  the  highest 
empty  one. 

•  The  subroutine  can  determine  the  value  of  the  stack  pointer  (the  location  of  the 
parameters)  by  (a)  storing  it  in  memory  with  LD  ( ADDR),SP  or  (b)  using  the  sequence 

LD      HL,0  J  MOVE  STACK  POINTER  TO  HL 

ADD  HL,SP 

This  sequence  places  the  stack  pointer  in  register  pair  HL  (the  opposite  of  LD  SP,HL). 
We  can  use  an  index  register  instead  of  HL  if  HL  is  reserved  for  other  purposes. 

•  The  calling  program  must  place  the  parameters  in  the  stack  and  assign  space  for 
the  results  before  calling  the  subroutine.  It  must  also  remove  the  parameters  from  the 
stack  (often  referred  to  as  cleaning  the  stack)  afterward.  Cleaning  the  stack  is  simple  if 
the  programmer  always  places  the  parameters  above  the  empty  area  assigned  to  the 
results.  Then  the  parameters  can  be  removed,  leaving  the  results  at  the  top.  The  next 
example  illustrates  how  this  is  done.  An  obvious  alternative  is  for  the  results  to  replace 
some  or  all  of  the  parameters. 

■  Stack  locations  can  be  allocated  dynamically  for  results  with  the  sequence 

LD      HL,-NRESLT  ; LEAVE  ROOM  FOR  RESULTS 

ADD  HL,SP 
LD  SP,HL 

This  sequence  leaves  NRESLT  empty  locations  at  the  top  of  the  stack  as  shown  in 
Figure  1-8.  Of  course,  if  NRESLT  is  small,  simply  executing  DEC  SP  NRESLT  times 
will  be  faster  and  shorter.  The  same  approaches  can  be  used  to  provide  stack  locations 
for  temporary  storage. 

Example 

Assume  that  subroutine  SUBR  requires  an  8-bit  parameter  and  a  16-bit  parameter, 
and  that  it  produces  two  8-bit  results.  Show  a  call  of  SUBR,  the  placing  of  the 
parameters  in  the  accumulator  and  register  pair  HL,  and  the  cleaning  of  the  stack  after 
the  return.  Figure  1-9  shows  the  appearance  of  the  stack  initially,  after  the  subroutine 
call,  and  at  the  end.  Using  the  stack  for  parameters  and  results  will  generally  keep  the 
parameters  at  the  top  of  the  stack  in  the  proper  order.  In  this  case,  there  is  no  need  to 
save  the  parameters  or  assign  space  in  the  stack  for  the  results  (they  will  replace  some 
or  all  of  the  original  parameters).  However,  space  must  be  assigned  on  the  stack  for 
temporary  storage  to  maintain  generality  and  reentrancy. 
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Calling  program 


Subroutine 
SUBR: 


LD 

HL,-2 

; LEAVE  ROOM  ON  STACK  FOR  RESULT 

ADD 

HL,SP 

;A  GENERAL  WAY  TO  ADJUST  SP 

LD 

SP,HL 

LD 

HL, (PAR16)| OBTAIN  16-BIT  PARAMETER 

PUSH 

ML 

iMOVE  16-EIT  PARAMETER  TO  STACK 

LD 

A, (PARS) 

; OBTAIN  8-BIT  PARAMETER 

PUSH 

AF 

sMOVE  S-BIT  PARAMETER  TO  STACK 

INC 

SP 

; REMOVE  EXTRANEOUS  BYTE 

CALL 

SUBR 

; EXECUTE  SUBROUTINE 

LD 

HL,3 

; CLEAN  PARAMETERS  FROM  STACK 

ADD 

HL,SP 

LD 

SP,HL 

; RESULT  IS  NOW  AT  TOP  OF  STACK 

LD 

HL,2 

; POINT  TO  START  OF  PARAMETER  AREA 

ADD 

HL,SP 

LD 

A, (HL) 

;GET  S-BIT  PARAMETER 

INC 

HL 

LD 

E, (HL) 

;GET  16-EIT  PARAMETER 

INC 

HL 

LD 

D, (HL) 

INC 

HL 

EX 

DE,HL 

remainder  of  subroutine 


RET 


The  first  three  instructions  of  the  calling  program  could  be  replaced  with  two  DEC 
SP  instructions,  and  the  last  three  instructions  with  three  INC  SP  instructions.  Note 
that  only  16-bit  register  pairs  can  be  moved  to  or  from  the  stack.  Remember,  AF 
consists  of  the  accumulator  (MSB)  and  the  flags  (LSB). 


Empty  space 
for  storing 
results  in  tiie 
stack 


Stack 
Pointer 

No  values  are  placed  in  the  locations. 

The  initial  contents  of  the  stack  pointer  are  ssss. 


ssss  -  NRESLT 


Stack 
Pointer 


Figure  1-8.  The  stack  before  and  after  assigning  NRESLT  empty  locations  for  results 
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Initial  State  of 
the  Stack 


Stack  After  Execution 
of  CALL  SUBR 


LSB  of  return 
address 


MSB  of  return 

address 


8-bit 
parameter 


LSB  of  16-bit 
parameter 


MSB  of  16-bit 
paiameter 


Empty  byte 
for  result  #1 


ssss 

! 

Stack 
Pointer 


The  initial  contents  of  the  stack  pointer  are  ssss. 


Empty  byte 
for  result  #2 


ssss-7 


Stack 
Pointer 


Final  State  of 
the  Stack 


ssss-2 


Result  #1 


Result  #2 


Stack 
Pointer 


Figure  1-9.  The  effect  of  a  subroutine  on  the  stack 


SIMPLE  INPUT/OUTPUT 

Simple  input/  output  can  be  performed  using  either  8-bit  device  (port)  addresses  or 
full  16-bit  memory  addresses.  The  advantages  of  device  addresses  are  that  they  are 
short  and  provide  a  separate  address  space  for  I/O  ports.  The  disadvantages  are  that 
only  a  few  instructions  (IN,  OUT,  and  block  I/O  instructions)  use  device  addresses.  If, 
on  the  other  hand,  I/O  devices  occupy  memory  addresses,  any  instruction  that 
references  memory  can  also  perform  I/O.  The  problems  with  this  approach  are  that  it 
is  non-standard,  it  makes  it  difficult  for  a  reader  to  differentiate  1/  O  transfers  from 
memory  transfers,  and  it  requires  that  some  memory  address  space  be  reserved  for  1/  O 
devices. 

Examples 

1.  Load  the  accumulator  from  input  port  2. 

IN      A,  (2.)  jREAD  FROM  PORT  2 

or 

LD      C,2  ;PUT  PORT  ADDRESS  IN  C 

IN      A,(C.^  sREAD  FROM  PORT  2 
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The  second  alternative  is  longer  but  more  flexible.  The  IN  reg,(C)  instruction  allows 
the  data  to  be  obtained  from  any  port  and  loaded  into  any  register.  On  the  other  hand, 
IN  A,(port)  is  hmited  to  loading  the  accumulator  from  a  fixed  port  address.  The  Sign 
and  Zero  flags  can  be  set  by  IN  reg,(C)  for  later  testing,  whereas  IN  A,(port)  does  not 
affect  the  flags. 

2.  Load  the  accumulator  from  the  input  port  addressed  by  the  contents  of  memory 
location  IPORT 

LD      A,  a  PORT.)   ;GET  DEVICE  (PORT)  ADDRESS 
LD      C,  A 

IN      A, CO  jREAD  DATA  FROM  INPUT  PORT 

The  port  address  can  be  readily  changed  (by  changing  RAM  location  IPORT)  to 
accommodate  multiple  input  devices  attached  to  a  single  CPU  or  to  handle  different 
device  addresses  used  in  different  models,  configurations,  or  computers. 

3.  Load  the  accumulator  from  the  input  port  assigned  to  the  memory  address  in 
HL. 

LD      A, (HL>         ;READ  DATA  FROM  INPUT  PORT 

Here  the  same  input  routine  can  obtain  data  from  any  memory  address.  Of  course, 
that  memory  address  is  no  longer  available  for  normal  use,  thus  reducing  the  actual 
memory  capacity  of  the  computer 

4.  Store  the  accumulator  in  output  port  6. 

OUT     (6.),  A  ?WRITE  DATA  TO  PORT  6 

or 

LD      C,6  ; ACCESS  PORT  & 

OUT     (C.>,A  ; WRITE  DATA  TO  PORT  6 

In  the  second  alternative,  the  indirect  port  address  can  be  changed  easily  to  accom- 
modate a  different  set  of  I/O  ports  or  variable  1/ O  devices. 

5.  Store  the  accumulator  in  the  output  port  addressed  by  the  contents  of  memory 
location  OPORT 

LD      HL, OPORT     ;OBTAIN  PORT  ADDRESS 
LD      C,  tHL.) 

OUT     (C),A  jSEND  DATA  TO  OUTPUT  PORT 

Here  the  port  address  is  a  variable. 

6.  Store  the  accumulator  in  the  output  port  assigned  to  the  memory  address  in  HL. 

LD       (HL),A         ;SEND  DATA  TO  OUTPUT  PORT 
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Here  the  same  output  routine  can  send  data  to  any  memory  address. 

7.  Set  the  Zero  flag  if  bit  5  of  port  D4i6  is  0. 

IN      A, (0D4H)  ;READ  DATA  FROM  PORT  D4 

BIT     5, A  fTEST  BIT  5 

If  the  bit  position  to  be  tested  is  0,  6,  or  7,  a  shift  or  AND  A  instruction  can  be  used  to 
test  it. 


8.  Load  the  Carry  flag  from  bit  7  of  the  input  port  assigned  to  memory  address 
33A5i6. 

LD      A,  (33A5H.)  ; OBTAIN  DATA 

RLA  fMOVE  SIGN  BIT  TO  CARRY 


or 

LD      HL,  (33A5H.t 

RL       (HL)  fMOVE  SIGN  BIT  OF  INPUT  DATA  TO  CARRY 

RL  (HL)  could  have  unpredictable  side  effects,  since  it  will  attempt  to  store  its  result 
back  in  the  input  port.  Although  the  port  is  addressed  as  a  memory  location,  it  may  not 
be  writable  (that  is,  it  might  act  like  a  ROM  location).  For  example,  it  could  be 
attached  to  a  set  of  switches  that  the  microprocessor  obviously  cannot  change. 


9.  Set  bit  5  of  output  port  ASig. 

LD      A,00100000B  fSET  BIT  5  TO  1 

OUT     (0A5H.),A  fMOVE  THE  BIT  TO  PORT  A5 

To  leave  the  other  bits  of  port  ASjg  unchanged,  a  copy  of  the  data  in  RAM  is  needed. 
Then  the  following  sequence  will  set  bit  5  to  1 . 

LD  A,  (COPY.>  fGET  COPY  OF  DATA 

SET  5, A  fSET  BIT  5 

OUT  (0A5H),A  f UPDATE  OUTPUT  DATA 

LD  (COPY.), A  f UPDATE  COPY  OF  DATA 

Note  that  the  CPU  cannot  generally  read  an  output  port,  and  the  input  port  with  the 
same  device  address  is  not  necessarily  the  same  physical  location. 

10.  Clear  bit  3  of  the  output  port  assigned  to  memory  address  B070i6. 

LD      HL,  0B070H 

RES     3, (HL)  t CLEAR  BIT  3 

Even  though  the  output  port  is  addressed  as  a  memory  location,  it  may  not  be 
readable.  If  it  is  not,  the  overall  effect  of  RES  3,(HL)  will  be  uncertain;  the  instruction 
will  surely  clear  bit  3,  but  it  will  assign  the  other  bits  of  the  port  the  values  supposedly 
obtained  by  reading  from  them.  These  values  are  generally  arbitrary  unless  the  port  is 
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latched  and  buffered.  Saving  a  copy  of  the  data  in  RAM  location  TEMP  removes  the 
uncertainty.  Now  bit  3  can  be  cleared  with  the  sequence 

LD  HL,TEIiP 

RES  3,  (HL.>  ;SET  BIT  3  OF  COPY 

LD  DE,B070H 

LDI  ;SET  BIT  3  OF  OUTPUT  DATA  ALSO 


Block  Input  and  Output  Instructions 

The  Z80  has  special  instructions  that  combine  input  or  output  with  counting  and 
updating  of  a  memory  pointer.  These  so-called  block  1/  O  instructions  work  much  like 
the  block  move  and  block  compare  instructions  discussed  earlier.  All  block  I/O 
instructions  move  data  either  from  memory  to  an  output  port  or  from  an  input  port  to 
memory  (without  involving  the  accumulator),  update  (either  increment  or  decrement) 
the  memory  pointer  in  register  pair  HL,  and  decrement  the  counter  in  register  B.  Note 
that  block  I/O  instructions  use  an  8-bit  byte  counter  in  register  B,  whereas  block  move 
and  block  compare  instructions  use  a  16-bit  counter  in  BC.  In  block  I/O  instructions, 
register  C  always  contains  the  device  address.  The  only  meaningful  flag  is  the  Zero 
flag;  it  is  set  to  1  if  the  instruction  decrements  B  to  0,  and  to  0  otherwise. 

Repeated  block  I/O  instructions  continue  transferring  data,  updating  HL,  and 
decrementing  B  until  B  is  decremented  to  0.  The  drawback  here  is  that  continuous  data 
transfers  make  sense  only  if  the  I/O  device  operates  at  the  same  speed  as  the  processor. 
Obviously,  most  I/O  devices  operate  much  more  slowly  than  the  processor,  and  the 
programmer  must  introduce  a  delay  between  transfers.  For  example,  the  processor 
cannot  transfer  a  block  of  data  to  or  from  a  keyboard,  printer,  video  display,  or 
magnetic  tape  unit  without  waiting  between  characters.  Thus,  repeated  block  I/O 
instructions  are  useful  only  to  transfer  data  to  devices  that  operate  at  processor  speed, 
such  as  a  buffer  memory  or  a  peripheral  chip. 

The  Z80's  block  I/O  instructions  are  the  following: 

■  INI  (IND)  moves  a  byte  of  data  from  the  port  address  in  C  to  the  memory  address 
in  HL,  increments  (decrements)  HL,  and  decrements  B. 

•  INIR  (INDR)  repeats  INI  (IND)  until  B  is  decremented  to  0. 

•  OUTI  (OUTD)  moves  a  byte  of  data  from  the  memory  address  in  HL  to  the  port 
address  in  C,  increments  (decrements)  HL,  and  decrements  B. 

•  OTIR  (OTDR)  repeats  OUTI  (OUTD)  until  B  is  decremented  to  0. 

Note  that  block  I/O  instructions  reserve  B,  C,  and  HL,  but  not  DE.  These  instruc- 
tions also  change  all  the  flags  except  Carry,  although  only  the  Zero  flag  is  meaningful. 
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Examples 

1.  Move  a  byte  of  data  from  memory  address  ADDR  to  output  port  OPORT. 

LD      B,l  ; NUMBER  OF  BYTES  =  1 

LD      C, OPORT  ;PORT  ADDRESS  =  OPORT 

LD      HL.ADDR  ; INITIALIZE  MEMORY  POINTER 

OUT I  J  MOVE  A  BYTE  OF  DATA 

Obviously,  the  overhead  of  loading  the  registers  makes  it  uneconomical  to  use  OUTI  to 
send  a  single  byte  of  data. 

2.  Move  two  bytes  of  data  from  input  port  IPORT  to  memory  addresses  ADDR 
and  ADDR+1.  Use  subroutine  DELAY  to  wait  before  each  transfer;  assume  that 
DELAY  provides  the  proper  time  interval  without  affecting  any  registers. 


LD  E,2 

LD  C, IPORT 

LD  HL,ADDR 

INBYT:         CALL  DELAY 
INI 

JR  NZ, INBYT 


NUMBER  OF  BYTES  =  2 
PORT  ADDRESS  =  IPORT 
INITIALIZE  MEMORY  POINTER 
WAIT  BEFORE  EACH  INPUT  BYTE 
READ  A  BYTE  AND  UPDATE 


The  Zero  flag  indicates  whether  the  counter  in  B  has  been  decremented  to  0.  Not  only 
does  INI  transfer  the  data  directly  into  memory,  but  it  also  increments  HL  and 
decrements  B. 

3.  Move  ten  bytes  of  data  from  memory  addresses  starting  with  ADDR  to  output 
port  OPORT.  Use  subroutine  DELAY  to  wait  between  bytes. 

LD      B, 10  ; NUMBER  OF  BYTES  =  10 


LD      C, OPORT 
LD  HL,ADDR 
OUTBYTs  OUTI 

CALL  DELAY 

JR  NZ,OUTBYT 


PORT  ADDRESS  =  OPORT 
INITIALIZE  MEMORY  POINTER 
WRITE  A  BYTE  AND  UPDATE 
WAIT  BETWEEN  BYTES 


We  cannot  use  the  repeated  block  output  instruction  OTIR,  since  it  does  not  allow  a 
delay  between  bytes. 

4.  Move  30  bytes  of  data  from  an  input  buffer  addressed  through  input  port  IPORT 
to  memory  addresses  starting  with  ADDR.  Assume  that  the  processor  can  read 
successive  bytes  of  data  from  the  buffer  without  waiting. 

LD      B,30  ; NUMBER  OF  BYTES  =  30 

LD      C, IPORT  ;PORT  ADDRESS  =  IPORT 

LD      HL,ADDR  ; INITIALIZE  MEMORY  POINTER 

INIR  jREAD  A  BLOCK  OF  DATA 

This  sequence  does  not  allow  any  programmed  delay  between  input  operations,  so  it 
makes  sense  only  if  the  input  device  operates  at  the  same  speed  as  the  processor. 


56    Z80  ASSEMBLY  LANGUAGE  SUBROUTINES 


LOGICAL  AND  PHYSICAL  DiVICES 


One  way  to  allow  references  to!  /  O  devices  by  number  is  to  use  an  1/  O  device  table. 
An  1/  O  device  table  assigns  the  actual  1  /  O  addresses  {physical  devices)  to  the  device 
numbers  (logical  devices)  to  which  a  program  refers.  A  systems  program  then  uses  the 
table  to  convert  the  device  numbers  into  actual  I/O  addresses. 

The  same  applications  program  can  be  made  to  utilize  different  I/O  devices  by 
making  the  appropriate  changes  in  the  I/O  device  table.  A  program  written  in  a 
high-level  language  may,  for  example,  refer  to  input  device  #2  and  output  device  #5. 
For  testing  purposes,  an  operator  may  assign  devices  #2  and  #5  to  be  the  input  and 
output  ports,  respectively,  of  his  or  her  console.  For  normal  stand-alone  operation,  the 
operator  may  assign  device  #2  to  be  an  analog  input  unit  and  device  #5  the  system 
printer.  For  operation  by  remote  control,  the  operator  may  assign  devices  #2  and  #5  to 
be  communications  units  used  for  input  and  output. 

This  distinction  between  logical  and  physical  devices  can  be  implemented  by  using 
the  instructions  IN  reg,(C)  and  OUT  (C),reg.  If  a  device  table  starting  in  address 
lOTBL  and  consisting  of  8-bit  device  addresses  is  used,  input  and  output  are  general- 
ized as  follows: 

•  Load  the  accumulator  from  a  fixed  device  number  DNUM. 

LD      A,  (lOTBL+DNUM.)   ;GET  DEVICE  ADDRESS 
LD      C,  A 

IN      A,(C.>  fOBTAIN  DATA  FROM  DEVICE 

•  Load  the  accumulator  from  the  device  number  in  memory  location  DEVNO. 


LD 

A,  C DEVNO.) 

;GET  DEVICE  NUMBER 

LD 

L,A 

jMAKE  DEVICE  NUMBER  INTO  INDEX 

LD 

H,0 

LD 

DE, lOTBL 

;GET  BASE  ADDRESS  OF  DEVICE  TABLE 

ADD 

HL,DE 

; ACCESS  ACTUAL  DEVICE  ADDRESS 

LD 

C,  <HL.> 

; OBTAIN  DEVICE  ADDRESS 

IN 

A,  (C.) 

;OBTAIN  DATA  FROM  DEVICE 

■  Store  the  accumulator  in  a  fixed  device  number  DNUM. 

LD      HL, lOTBL+DNUM     jGET  DEVICE  ADDRESS 
LD      C,  (HL.) 

OUT     (C.),A  ;SEND  DATA  TO  DEVICE 

•  Store  the  accumulator  in  the  device  number  in  memory  location  DEVNO. 


LD 

E,  A 

;SAVE  OUTPUT  DATA 

LD 

A, (DEVNO) 

;GET  DEVICE  NUMBER 

LD 

L,A 

;MAKE  DEVICE  NUMBER  INTO  INDEX 

LD 

H,0 

LD 

DE, lOTEL 

;GET  BASE  ADDRESS  OF  DEVICE  TABLE 

ADD 

HL,DE 

; ACCESS  ACTUAL  DEVICE  ADDRESS 

LD 

C, (HL) 

J  OBTAIN  DEVICE  ADDRESS 

OUT 

(C.1  ,B 

;SEND  DATA  TO  DEVICE 
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In  real  applications  (see  Chapter  10),  the  device  table  generally  contains  the  starting 
addresses  of  I/O  subroutines  {drivers)  rather  than  actual  device  addresses. 


STATUS  AND  CONTROL 


Status  and  control  signals  can  be  handled  like  any  other  data.  The  only  special 
problem  is  that  the  processor  cannot  ordinarily  read  output  ports.  To  know  the  current 
contents  of  an  output  port,  retain  a  copy  in  RAM  of  the  data  stored  there. 


Examples 

1.  Branch  to  address  DEST  if  bit  3  of  input  port  6  is  1. 

IN      A,  (6.^  SREAD  STATUS  FROM  PORT  6 

BIT     3, A  sTEST  BIT  3 

JR      NZ,DEST  ! BRANCH  IF  BIT  3  IS  1 


2.  Branch  to  address  DEST  if  bits  4, 5,  and  6  of  input  port  STAT  are  5  (101  binary). 

IN  A, (STAT. 1  ! READ  STATUS 

AND  OlllOOOOB  jMASK  OFF  BITS  4, 5, AND  6 

CP  OlOlOOOOB  5  IS  STATUS  FIELD  =  5? 

JR  Z,DEST  5 YES,   BRANCH  TO  DEST 


3.  Set  bit  5  of  output  port  CNTL  to  1 .  Assume  that  a  copy  of  the  data  is  in  a  table 
starting  at  address  OUTP. 

LD  HL,OUTP+CNTL  ;GET  COPY  OF  DATA 

LD  A, tHL) 

OR  OOlOOOOOB  ;SET  BIT  5  OF  PORT 

OUT  (CNTL.),  A  J  SEND  DATA  TO  OUTPUT  PORT 

LD  (HL>,A-  ; UPDATE  COPY  OF  DATA 

Update  the  copy  every  time  the  data  is  changed. 

4.  Set  bits  2,  3,  and  4  of  output  port  CNTL  to  6  (110  binary).  Assume  that  a  copy  of 
the  data  is  in  a  table  starting  at  address  OUTP. 

LD  HL,OUTP+CNTL  ;GET  COPY  OF  DATA 

LD  A,  (HL.> 

AND  n 10001 IB  ; CLEAR  BITS  2,3,   AND  4 

OR  OOOllOOOB  ;SET  CONTROL  FIELD  TO  & 

OUT  (CNTL.>,A  sSEND  DATA  TO  OUTPUT  PORT 

LD  (HL.'»,A  ; UPDATE  COPY  OF  DATA 

Retaining  copies  of  the  data  in  memory  (or  using  the  values  stored  in  a  latched, 
buffered  output  port)  allows  changing  part  of  the  data  without  affecting  other  parts 
that  may  have  unrelated  meanings.  For  example,  changing  the  state  of  one  indicator 
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light  (such  as  a  Hght  that  indicated  remote  operation)  will  not  affect  other  indicator 
lights  attached  to  the  same  port.  Similarly,  changing  one  control  line  (for  example,  a 
line  that  determined  whether  an  object  was  moving  in  the  positive  or  negative 
X-direction)  would  not  affect  other  control  lines  attached  to  the  same  port. 

5.  Branch  to  address  DEST  if  bit  7  of  input  port  IPORT  is  0. 


The  instruction  IN  reg,(C)  affects  the  Sign  and  Zero  flags,  whereas  IN  A,(port)  does 
not. 


The  most  common  peripheral  chips  in  Z80-based  computers  are  the  PIO  (Parallel 
Input/Output  device),  SIO  (Serial  Input/Output  device),  and  CTC  (Clock/Timer 
Circuit).  All  these  devices  can  perform  many  functions,  much  as  the  microprocessor 
itself  can.  Of  course,  peripheral  chips  perform  fewer  different  functions  than  proces- 
sors, and  the  range  of  functions  is  much  more  limited.  The  idea  behind  programmable 
peripheral  chips  is  that  each  chip  contains  many  useful  circuits;  the  designer  selects  the 
one  he  or  she  wants  to  use  by  storing  arbitrary  codes  in  control  registers,  much  like 
selecting  circuits  from  a  designer's  casebook  by  specifying  arbitrary  page  numbers  or 
other  designations.  The  advantages  of  programmable  chips  are  that  a  single  board 
containing  such  devices  can  handle  many  applications,  and  changes  or  corrections  can 
be  made  by  changing  selection  codes  rather  than  by  redesigning  circuit  boards.  The 
disadvantages  of  programmable  chips  are  the  lack  of  standards  and  the  difficulty  of 
learning  and  explaining  how  specific  chips  operate. 

Chapter  10  contains  typical  initialization  routines  for  the  PIO,  SIO,  and  CTC 
devices.  (The  PIO  and  CTC  are  discussed  in  detail  in  the  Osborne  4  &  8-Bit  Micro- 
processor Handbook. '-)  We  will  provide  only  a  brief  overview  of  the  PIO  device  here, 
since  it  is  the  most  widely  used.  Bas  and  Kaynak  describe  a  typical  industrial  applica- 
tion using  a  PIO.'^ 


LD 
IN 


C, IPORT 
A,  (C.) 
Z , DEST 


; ESTABLISH  PORT  ADDRESS 

jREAD  DATA  FROM  PORT 

; BRANCH  IF  INPUT  BIT  7  IS  0 


PERIPHERAL  CHIPS 


PIO  (Parallel  Input/Output  Device) 
General  Description 


The  PIO  contains  two  8-bit  ports,  A  and  B.  Each  port  contains 

■  An  8-bit  output  register. 

■  An  8-bit  input  register. 
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•  A  2-bit  mode  control  register,  which  indicates  whether  the  port  is  in  an  output, 
input,  bidirectional,  or  control  mode. 

•  An  8-bit  input /  output  control  register,  which  determines  whether  the  correspond- 
ing data  pins  are  inputs  (1)  or  outputs  (0)  in  the  control  mode. 

•  Two  control  lines  (STB  and  RDY)  that  can  be  used  for  handshaking  signals  (the 
contents  of  the  mode  control  register  determine  how  these  hnes  operate). 

•  An  interrupt  enable  bit. 

•  A  2-bit  mask  control  register  (used  only  in  the  control  mode)  that  determines  the 
active  polarity  of  the  inputs  and  whether  they  will  be  logically  ANDed  or  ORed  to 
form  an  interrupt  signal. 

•  An  8-bit  mask  register  (used  only  in  the  control  mode)  that  determines  which  port 
lines  will  be  monitored  to  form  the  interrupt  signal. 

•  An  8-bit  vector  address  register  used  with  the  interrupt  system. 

Here,  the  important  points  are  the  input  and  output  registers,  the  mode  control 
register,  the  input/ output  control  register,  and  the  control  hnes.  The  interrupt-related 
features  of  the  PIO  are  discussed  in  Z80  Assembly  Language  Programming. 

The  meanings  of  the  bits  in  the  various  control  and  mask  registers  are  related  to  the 
underlying  hardware  and  are  entirely  arbitrary  as  far  as  the  programmer  is  concerned. 
Tables  are  provided  here  and  in  Appendix  B  for  looking  them  up. 

Each  PIO  occupies  four  input  port  addresses  and  four  output  port  addresses.  The 
B/  A  SEL  (Port  B  or  A  select)  and  C/  D  SEL  (Control  or  Data  select)  hnes  choose  one 
of  the  four  ports  as  described  in  Table  1-10.  Most  often,  designers  attach  address  line 
Ao  to  B/  A  SEL  and  Ai  to  C/  D  SEL.  The  PIO  then  occupies  the  four  consecutive  port 
addresses  given  in  the  last  column  of  Table  1-10. 

Clearly,  there  are  far  more  internal  control  registers  than  there  are  port  addresses 
available.  In  fact,  all  the  control  registers  for  each  port  occupy  one  address  determined 


Table  1-10.  PIO  Addresses 


Control  or 

Port  B  or  A 

Register 

Port  Address  (Starting 

Data  select 

Select 

Addressed 

with  PIOADD) 

0 

0 

Data  Register  A 

PIOADD 

0 

1 

Data  Register  B 

PIOADD+1 

1 

0 

Control  A 

PIOADD+2 

1 

1 

Control  B 

PIOADD+3 

The  port  addresses  assume  that  C/  D  SEL  is 

tied  to  A,  and  B/ A  SEL  to  A 

0- 

60    Z80  ASSEMBLY  LANGUAGE  SUBROUTINES 


Table  1-11.  Addressing  of  PIO  Control  Registers 


Register 

Addressing 

Mode  Control 
Input/Output  Control 
Mask  Control  Register 
Interrupt  Mask  Register 
Interrupt  Enable 
Interrupt  Vector 

D,  =  D2=D,  =  Do=  I 

Next  byte  after  port  placed  in  mode  3 

Dj  =  0,  D2  =  D|  =  Do  =  I 

Next  byte  after  mask  control  register  accessed  with  D4  =  1 
D3  =  Dj  =  0,  D,  =  Do  =  I 
Do=  1 

by  the  C/D  SEL  connection.  Thus,  some  of  the  data  bits  sent  to  a  control  register  are 
actually  used  for  addressing.  Note  the  following  situations  (see  Table  1-11): 

■  If  Do  =  0,  the  remaining  data  bits  are  loaded  into  the  interrupt  vector  register. 

•  If  D3  =  0  and  D2  =  D  j  =  Do  =  1 ,  the  remaining  data  bits  are  loaded  into  the  mask 
control  register.  If  D4  =  1 ,  the  next  control  byte  is  loaded  into  the  interrupt  mask 
register.  Interrupts  can  be  enabled  (D7  =  1)  or  disabled  (D7  =  0)  with  D3  =  D2  =  0, 
D,=  Do=l. 

•  If  D3,  D2,  Di,  and  Dq  are  all  I's,  the  remaining  data  bits  are  loaded  into  the  mode 
control  register.  If  D7  =  Dg  =  1  (that  is,  the  port  has  been  placed  in  the  control  mode), 
the  next  control  byte  is  loaded  into  the  input/  output  control  register. 

This  sharing  of  an  external  address  means 

■  The  programmer  must  be  careful  to  specify  the  proper  addresses,  data  values,  and 
order  of  operations.  The  actual  destination  of  an  OUT  instruction  directed  to  a  PIO 
control  address  depends  on  the  data  value  and  may  also  depend  on  the  OUT  instruc- 
tion that  preceded  it. 

•  The  programmer  should  document  the  PIO  initialization  in  detail.  The  device  is 
complex,  and  a  reader  cannot  be  expected  to  understand  the  initializing  sequence. 

The  control  registers  of  the  PIO  are  usually  initialized  only  in  an  overall  startup 
routine.  Other  routines  typically  refer  only  to  the  PIO  input  and  output  registers.  Since 
all  of  its  control  registers  share  a  port  address,  a  repeated  block  output  instruction 
(OTIR  or  OTDR)  can  be  used  to  initiahze  a  PIO.  No  timing  problem  occurs,  since  the 
PIO  operates  at  the  same  speed  as  the  CPU.  Chapter  10  contains  an  example  showing 
the  use  of  repeated  block  output  instructions  to  initialize  PIOs  and  other  peripheral 
chips. 


CHAPTER  1  GENERAL  PROGRAMMING  METHODS  61 


PIO  Operating  Modes 

A  startup  program  selects  the  operating  mode  of  a  PIO  port  by  writing  a  control 
byte  to  the  PIO  in  the  form  shown  in  Figure  1-10.  The  lower  table  in  Figure  1-10 
describes  the  operating  modes  and  their  associated  control  bytes.  Note  that  only  bits  6 
(Mq)  and  7  ( M 1 )  affect  the  operating  mode;  bits  4  and  5  are  not  used  and  bits  0  through 
3  are  used  for  addressing.  When  power  is  turned  on,  the  PIO  comes  up  in  mode  1 
(input).  The  modes  may  be  summarized  as  follows: 

•  Mode  0  —  Output  (bit  7  =  bit  6  =  0) 

Writing  data  into  the  port's  output  register  latches  the  data  and  causes  it  to  appear 
on  the  port's  data  bus.  The  Ready  (RDY)  hne  goes  high  to  indicate  Data  Ready;  it 
remains  high  until  the  peripheral  sends  a  rising  edge  (a  0-to- 1  or  low-to-high  transition) 
on  the  Strobe  (STB)  Hne  to  indicate  Data  Accepted  or  Device  Ready.  The  rising  edge 
of  STB  causes  an  interrupt  if  the  interrupt  is  enabled. 

•  Mode  1  —  Input  (bit  7  =  0,  bit  6  =  1) 

The  peripheral  latches  data  into  the  port's  input  register  using  the  Strobe  signal.  The 
rising  edge  of  STB  causes  an  interrupt  (if  enabled)  and  deactivates  RDY  (makes  it  0). 
When  the  CPU  reads  the  data,  RDY  goes  high  to  indicate  Data  Accepted  or  Input 
Register  Empty.  Note  that  the  peripheral  can  strobe  data  into  the  register  regardless  of 
the  state  of  RDY.  The  programmer  is  therefore  responsible  for  guarding  against 
overrun  (new  data  being  placed  in  the  register  before  the  CPU  has  read  the  old  data). 


Set  Mode 


Ml 

MO 

Mode 

0 

0 

Output 

0 

1 

Input 

1 

0 

Bidirectional 

1 

] 

Bit  Control 

PIO 

Mode 

Meaning 

Control  Byte 

(Binary) 

(Hex) 

0 

Output 

00001111 

OF 

1 

Input 

01001111 

4F 

2 

Bidirectional 

10001111 

8F 

3 

Control 

lIOOllll 

CF 

Note  that  bits  4  and  5  are  not  used  and  could  have 
any  values. 


Ml 

MO 

X 

X 

1 

1 

1 

1 

If  a  port  is  placed  in  mode  3.  the 
next  byte  sets  the  I/O  control 
register: 


I/07 

i;06 

1/05 

1/04 

1/03 

1/02 

I/Ol 

I/OO 

l/0=  1  Sets  bit  to  Input 
1/0=0  Sets  bit  to  Output 


Rgure  1-10.  Mode  control  for  the  Z80  PIO 
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•  Mode  2  —  Bidirectional  (bit  7  =  1,  bit  6  -  0) 

Since  this  mode  uses  all  four  handshake  lines,  it  is  allowed  only  on  port  A.  The  port 
A  RDY  and  STB  signals  are  used  for  output  control  and  the  port  B  RDY  and  STB 
signals  are  used  for  input  control.  The  only  difference  between  this  mode  and  a 
combination  of  modes  0  and  1  is  that  data  from  the  port  A  Output  register  is  enabled 
onto  the  port's  data  bus  only  when  A  STB  is  active.  This  allows  the  port  A  bus  to  be 
used  bidirectionally  under  the  control  of  A  STB  (Output  Data  Request)  and  B  STB 
(Input  Data  Available).  Note  that  operations  on  input  register  A  govern  port  B's 
control  signals  in  this  mode. 

•  Mode  3  -  Control  (bit  7  =  1,  bit  6  =  1) 

This  mode  does  not  use  the  RDY  and  STB  signals.  It  is  intended  for  status  and 
control  applications  in  which  each  bit  has  an  individual  meaning.  When  mode  3  is 
selected,  the  next  control  byte  sent  to  the  PIO  defines  the  directions  of  the  port's  bus 
Unes.  A  1  in  a  bit  position  makes  the  corresponding  bus  line  an  input,  whereas  a  0 
makes  it  an  output. 

Note  the  following  features  of  the  PIO's  operating  modes: 

•  In  modes  0,  1 ,  and  2,  the  peripheral  indicates  Data  Ready,  Device  Ready,  or  Data 
Accepted  with  a  rising  edge  on  the  STB  line.  This  edge  also  causes  an  interrupt  if  the 
interrupt  is  enabled. 

•  In  modes  0, 1 ,  and  2,  the  PIO  indicates  Data  Ready,  Input  Buffer  Empty,  or  Data 
Accepted  by  sending  RDY  high.  This  signal  remains  high  until  the  next  rising  edge  on 
STB. 

•  The  bidirectional  mode  (mode  2)  apphes  only  to  port  A,  and  port  B  must  be  placed 
in  mode  3  (control)  since  all  the  handshaking  hnes  are  already  committed. 

•  The  input/ output  control  register  is  used  only  in  the  control  mode  (mode  3). 
Otherwise,  the  entire  8-bit  port  is  used  for  either  input  or  output. 

•  There  is  no  way  for  the  processor  to  determine  if  a  pulse  has  occurred  on  STB  if 
interrupts  are  not  being  used.  The  PIO  is  designed  for  use  in  interrupt-driven  systems 
rather  than  in  programmed  I/O  systems.  STB  should  be  tied  low  if  it  is  not  being  used. 

•  The  processor  cannot  control  the  RDY  lines  directly.  The  RDY  hne  on  a  port  goes 
high  when  data  is  transferred  to  or  from  the  port  and  goes  low  on  the  rising  edge  of 
STB. 

•  The  contents  of  the  output  register  can  be  read  if  the  port  is  in  the  output  or 
bidirectional  mode.  If  the  port  is  in  the  control  mode,  the  output  register  data  from  the 
lines  assigned  as  outputs  can  be  read.  The  contents  of  control  registers  cannot  be  read. 
If  a  program  needs  to  know  their  contents,  it  must  save  copies  in  RAM  of  the  values 
stored  there. 

•  If  the  RDY  output  is  tied  to  the  STB  input  on  a  port  in  the  output  mode,  RDY  will 
go  high  for  one  clock  period  after  each  output  operation.  This  brief  pulse  can  be  used 
to  multiplex  displays. 
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PIO  Initialization 

When  power  is  turned  on,  the  PIO  comes  up  in  the  input  mode  with  all  interrupts 
disabled  and  inhibited  and  control  signals  deactivated  (low).  The  steps  in  initializing  a 
PIO  port  are 

•  Select  the  operating  mode  by  writing  the  appropriate  control  byte  into  the  mode 
control  register.  Interrupt  control  as  well  as  I/O  mode  information  may  have  to  be 
sent. 

•  If  in  mode  3,  establish  the  directions  of  the  1/  O  pins  by  writing  a  control  byte  into 
the  input/ output  control  register.  This  byte  must  follow  the  control  byte  that  selected 
mode  3. 

Examples 

1.  Make  port  B  output. 

LD      A, 00001 11  IB         jMAKE  PORT  B  OUTPUT 
OUT  (P10CRB),A 

Bits  0  through  3  of  the  control  byte  are  all  1  's  to  address  the  mode  control  register.  Bits 
6  and  7  are  both  O's  to  put  the  port  in  the  output  mode.  Bits  4  and  5  are  not  used. 

2.  Make  port  A  input. 

LD      A, 01001 11  IB         jMAKE  PORT  A  INPUT 
OUT  (PIOCRA.),A 

Bit  7  =  0  and  bit  6  =  1  to  put  the  port  in  the  input  mode. 

3.  Make  port  A  bidirectional. 

LD      A, 10001 U IB         jMAKE  PORT  A  BIDIRECTIONAL 
OUT     ( PI OCR A. 1,  A 

Bit  7  =  1  and  bit  6  =  0  to  put  the  port  in  the  bidirectional  mode.  Remember  that  only 
port  A  can  be  operated  in  the  bidirectional  mode,  and  that  port  B  must  then  be 
operated  in  the  control  mode. 

4.  Make  port  A  control  with  all  lines  inputs. 

LD       A, 11001 11  IB         J  MAKE  PORT  A  CONTROL 
OUT  (PIOCRA.),A 

LD      ArlllllUlB         ;ALL  BITS  INPUTS 
OUT  (PIOCRA),A 

The  first  OUT  instruction  puts  port  A  in  the  control  mode,  since  bits  6  and  7  are  both 
1.  The  second  OUT  operation  to  the  same  address  loads  a  different  register  (the 
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input/ output  control  register).  A  0  in  a  bit  position  of  that  register  makes  the 
corresponding  pin  an  output,  while  a  1  makes  it  an  input.  The  polarity  here  is  arbitrary, 
and  many  bidirectional  devices  use  the  opposite  convention. 

5.  Make  port  B  control  with  all  lines  outputs. 

LD      A,110011UB         jMAKE  PORT  B  CONTROL 
OUT  (PIOCRB),A 

SUB     A  ;ALL  BITS  OUTPUTS 

OUT  (PIOCRB),A 

The  second  byte  is  directed  automatically  to  the  input/ output  control  register  if  the 
first  byte  puts  the  port  in  the  control  mode. 

6.  Make  port  A  control  with  lines  1,  5,  and  6  inputs  and  hues  0,  2,  3,  4,  and  7 
outputs. 

LD      A, 11001 11  IB         fMAKE  PORT  A  CONTROL 
OUT     (PIOCRA) , A 

LD      A,01100010B         !l,5,6  IN— 0,2,3,4,7  OUT 

INTERRUPT  SERVICE  ROUTINES 

More  information  on  material  in  this  section  can  be  found  in  the  book  Practical 
Microcomputer  Programming:  The  Z80  by  W.J.  Waller,  Chapter  16. 

Z80  interrupt  systems  may  operate  in  any  of  three  modes. '5  In  all  three  modes,  the 
processor  responds  to  an  interrupt  by  executing  a  CALL  or  RST  instruction  which 
transfers  control  to  a  specific  memory  address  and  saves  the  current  program  counter 
at  the  top  of  the  stack.  Table  1-12  lists  the  destination  addresses  for  the  RST  instruc- 
tions and  the  non-maskable  interrupt.  No  other  registers  (besides  the  program  coun- 
ter) are  saved  automatically. 

There  are  two  common  approaches  to  saving  registers: 

•  If  there  is  only  a  single  level  of  interrupts,  primary  registers  may  be  saved  in  the 
alternate  set.  The  service  routine  begins  with 

EX       AF.AF'  5 SAVE  PRIMARY  REGISTERS  IN  ALTERNATES 

EXX 

The  EXX  instruction  exchanges  registers  B,  C,  D,  E,  H,  and  L  with  their  primed 
equivalents.  The  service  routine  must  end  by  restoring  the  original  primary  registers 
with 

EXX  ; RESTORE  ORIGINAL  PRIMARY  REGISTERS 

EX  AF,AF' 

This  approach  assumes  that  the  alternate  (primed)  registers  are  reserved  for  use  in 
interrupt  service  routines. 
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Table  1-12.  Destination  Addresses  for  RST  (Restart)  Instructions  and 
the  Non-Maskable  Interrupt 


RST  Instruction 

Operation  Code 

Destination  Address 

(Mnemonic) 

(Hex) 

(Hex) 

(Decimal) 

RSTO 

C7 

0000 

0 

RST  8 

CF 

0008 

08 

RST  lOH 

D7 

0010 

16 

RST  18H 

DF 

0018 

24 

RST  20H 

E7 

0020 

32 

RST  28 H 

EF 

0028 

40 

RST  30H 

F7 

0030 

48 

RST  38  H 

FF 

0038 

56 

Non-maskable 
interrupt 

0066 

102 

■  If  there  are  several  levels  of  interrupts,  each  service  routine  must  save  all  registers 
that  it  uses  in  the  stack.  Since  the  Z80  has  so  many  registers,  most  programmers  keep 
their  service  routines  simple  so  that  they  must  save  only  a  few  registers.  Otherwise,  the 
overhead  involved  in  servicing  interrupts  (sometimes  called  the  interrupt  latency) 
becomes  excessive.  A  typical  sequence  for  saving  the  primary  registers  in  the  stack  is 

PUSH  AF  jSAVE  REGISTERS 

PUSH  EC 
PUSH  DE 
PUSH  HL 

The  opposite  sequence  restores  the  primary  registers. 

POP     HL  ; RESTORE  REGISTERS 

POP  DE 
POP  EC 
POP  AF 

Interrupts  must  be  reenabled  explicitly  with  EI  immediately  before  the  RET  instruc- 
tion that  terminates  the  service  routine.  The  EI  instruction  delays  the  actual  enabling 
of  interrupts  for  one  instruction  cycle  to  avoid  unnecessary  stacking  of  return  ad- 
dresses (that  is,  an  RET  instruction  can  remove  the  return  address  from  the  stack 
before  a  pending  interrupt  is  recognized). 

You  must  be  careful  to  save  any  write-only  registers  that  may  have  to  be  restored  at 
the  end  of  the  routine.  For  example,  the  PIO's  control  registers  are  all  write-only,  and 
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many  external  priority  registers  are  also  write-only.  Copies  of  such  registers  must  be 
saved  in  RAM  and  restored  from  the  stack.  A  typical  example  is 


PUSH 
PUSH 
PUSH 
PUSH 
LD 

PUSH 
LD 
OUT 
LD 


AF 

BC 
DE 
HL 

A,  (PRTY.) 
AF 

A,NPRTY 

PPORT 

(PRTY.l,A 


;SAVE  REGISTERS 


sSAVE  OLD  PRIORITY 


GET  NEW  PRIORITY 

PLACE  IT  IN  EXTERNAL  PRIORITY  REGISTER 
SAVE  COPY  OF  NEW  PRIORITY  IN  RAM 


The  restoration  procedure  must  recover  the  previous  priority  as  well  as  the  original 
contents  of  the  registers. 

POP  AF 
OUT  PPORT 
LD  (PRTY.>,A 
POP  HL 
POP  DE 
POP  EC 
POP  AF 

To  achieve  general  reentrancy,  the  stack  must  be  used  for  all  temporary  storage 
beyond  that  provided  by  the  registers.  As  noted  in  the  discussion  of  parameter  passing, 
space  is  assigned  on  the  stack  (NPARAM  bytes)  with  the  sequence 

LD      HL, -NPARAM  ; ASSIGN  NPARAM  EMPTY  BYTES 

ADD  HL,SP 
LD  SP.HL 


RESTORE  OLD  PRIORITY 

PLACE  IT  IN  EXTERNAL  PRIORITY  REGISTER 
SAVE  COPY  OF  PRIORITY  IN  RAM 
RESTORE  REGISTERS 


Later,  of  course,  the  temporary  storage  area  is  discarded  with  the  sequence 

LD      HL, NPARAM  5  REMOVE  NPARAM  BYTES  FROM  STACK 

ADD  HL,SP 
LD  SP,HL 

If  NPARAM  is  small,  save  execution  time  and  memory  by  replacing  these  sequences 
with  NPARAM  DEC  SP  or  INC  SP  instructions.  Chapter  11  contains  examples  of 
simple  Interrupt  service  routines. 

Interrupt  service  routines  that  are  based  on  signals  from  Z80  peripheral  chips  (PIOs, 
SIOs,  or  CTCs)  or  that  utilize  the  non-maskable  input  require  special  terminating 
instructions.  These  special  instructions  restore  the  program  counter  from  the  top  of 
the  stack  just  Hke  the  normal  RET.  The  RETI  (return  from  interrupt)  instruction  also 
signals  the  peripheral  chips  that  the  service  routine  has  been  completed,  thus  unblock- 
ing lower  priority  interrupts.  The  RETN  (return  from  non-maskable  interrupt) 
instruction  also  restores  the  interrupt  enable  logic,  thus  reenabUng  interrupts  if  (and 
only  if)  they  were  enabled  when  the  non-maskable  interrupt  occurred. 
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MAKING  PROGRAMS  RUN  FASTER 

More  information  on  material  in  this  section  can  be  found  in  an  article  by  T.  Doll- 
hoff,  "Microprocessor  Software:  How  to  Optimize  Timing  and  Memory  Usage.  Part 
Four:  Techniques  for  the  Zilog  Z80,"  Digital  Design,  February  1977,  pp.  44-45. 

In  general,  programs  can  be  made  to  run  substantially  faster  only  by  first  determin- 
ing where  they  spend  their  time.  This  requires  determining  which  loops  (other  than 
delay  routines)  the  processor  is  executing  most  often.  Reducing  the  execution  time  of  a 
frequently  executed  loop  will  have  a  major  effect  because  of  the  multiplying  factor.  It  is 
thus  critical  to  determine  how  often  instructions  are  being  executed  and  to  work  on 
loops  in  the  order  of  their  frequency  of  execution. 

Once  it  is  determined  which  loops  the  processor  executes  most  frequently,  reduce 
their  execution  time  with  the  following  techniques: 

•  Eliminate  redundant  operations.  These  may  include  a  constant  that  is  being  added 
during  each  iteration  or  a  special  case  that  is  being  tested  repeatedly.  Another  example 
is  a  constant  value  or  a  memory  address  that  is  being  fetched  from  memory  each  time 
rather  than  being  stored  in  a  register  or  register  pair. 

•  Reorganize  the  loop  to  reduce  the  number  of  jump  instructions.  You  can  often 
ehminate  branches  by  changing  the  initial  conditions,  inverting  the  order  of  opera- 
tions, or  combining  operations.  In  particular,  you  may  find  it  helpful  to  initiaHze 
everything  one  step  back,  thus  making  the  first  iteration  the  same  as  all  the  others. 
Inverting  the  order  of  operations  can  be  helpful  if  numerical  comparisons  are  involved, 
since  the  equality  case  may  not  have  to  be  handled  separately.  Reorganization  may 
also  combine  condition  checking  inside  the  loop  with  the  overall  loop  control. 

•  Use  in-line  code  rather  than  subroutines.  This  will  save  at  least  a  CALL  and  RET. 

•  Use  the  stack  rather  than  specific  memory  addresses  for  temporary  storage. 
Remember  that  EX  HL,(SP)  exchanges  the  top  of  the  stack  with  register  pair  HL  and 
thus  can  serve  to  both  restore  an  old  value  and  save  the  current  one. 

•  Assign  registers  to  take  maximum  advantage  of  such  specialized  instructions  as 
LD  HL,(ADDR);  LD  (ADDR),HL;  fex  DE,  HL;  EX  HL,(SP);  DJNZ;  and  the  block 
move,  compare,  and  I/O  instructions.  Thus  it  is  preferable  to  always  use  B  or  BC  for  a 
counter,  HL  for  an  indirect  address,  and  DE  for  another  indirect  address  if  needed. 

•  Use  the  block  move,  block  compare,  and  block  I/O  instructions  to  handle  blocks 
of  data.  These  instructions  can  replace  an  entire  program  sequence,  since  they  combine 
counting  and  updating  of  pointers  with  the  actual  data  manipulation  or  transfer 
operations.  Note,  in  particular,  that  the  block  move  and  block  I/O  instructions 
transfer  data  to  or  from  memory  without  using  the  accumulator. 

•  Use  the  16-bit  instructions  whenever  possible  to  manipulate  16-bit  data.  These 
instructions  are  ADC,  ADD,  DEC,  EX,  INC,  LD,  POP,  PUSH,  and  SBC. 
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•  Use  instructions  that  operate  directly  on  data  in  user  registers  or  in  memory  to 
avoid  having  to  save  and  restore  the  accumulator,  HL,  or  an  index  register.  These 
instructions  include  DEC,  EX,  INC,  LD,  POP,  PUSH,  and  the  bit  manipulation  and 
shift  instructions. 

■  Minimize  the  use  of  the  index  registers,  since  they  always  require  extra  execution 
time  and  memory.  The  index  registers  are  generally  used  only  as  backups  to  HL  and  in 
handling  data  structures  that  involve  many  fixed  offsets. 

•  Minimize  the  use  of  special  Z80  instructions  that  require  a  2-byte  operation  code. 
These  always  require  extra  execution  time  and  memory.  Examples  are  BIT,  RES,  SET, 
SLA,  SR  A,  and  SRL,  as  well  as  some  load  instructions  such  as  LD  DE,(ADDR),  LD 
(ADDR),BC,  and  LD  SF,(ADDR). 

•  Take  advantage  of  speciahzed  short  instructions  such  as  the  accumulator  shifts 
(RLA,  RLCA,  RRA,  and  RRCA)  and  DJNZ. 

•  Use  absolute  jumps  (JP)  rather  than  relative  jumps  (JR).  The  absolute  jumps  take 
less  time  if  a  branch  actually  occurs. 

•  Organize  sequences  of  conditional  jumps  to  minimize  average  execution  time. 
Branches  that  are  often  taken  should  come  before  ones  that  are  seldom  taken,  for 
example,  checking  for  a  result  being  negative  (true  50%  of  the  time  if  the  value  is 
random)  before  checking  for  it  to  be  zero  (true  less  than  1%  of  the  time  if  the  value  is 
random). 

•  Test  for  conditions  under  which  a  sequence  has  no  effect  and  branch  around  it  if 
the  conditions  hold.  This  will  be  profitable  if  the  sequence  is  long,  and  it  frequently 
does  not  change  the  result.  A  typical  example  is  the  propagation  of  carries  through 
higher  order  bytes.  If  a  carry  seldom  occurs,  it  will  be  faster  on  the  average  to  test  for  it 
rather  than  simply  propagate  a  0. 

A  general  way  to  reduce  execution  time  is  to  replace  long  sequences  of  instructions 
with  tables.  A  single  table  lookup  can  perform  the  same  operation  as  a  sequence  of 
instructions  if  there  are  no  special  exits  or  program  logic  involved.  The  cost  is  extra 
memory,  but  that  may  be  justified  if  the  memory  is  available.  If  enough  memory  is 
available,  a  lookup  table  may  be  a  reasonable  approach  even  if  many  of  its  entries  are 
repetitive — that  is,  even  if  many  inputs  produce  the  same  output.  In  addition  to  its 
speed,  table  lookup  is  also  general,  easy  to  program,  and  easy  to  change. 


MAKING  PROGRAMS  USE  L£SS  MEMORY 

Only  by  identifying  common  instruction  sequences  and  replacing  those  sequences 
with  subroutine  calls  can  a  program  be  made  to  use  significantly  less  memory.  The 
result  is  a  single  copy  of  each  sequence;  the  cost  is  the  extra  execution  time  of  the 
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CALL  and  RET  instructions.  The  more  instructions  placed  in  subroutines,  the  more 
memory  is  saved.  Of  course,  such  subroutines  are  typically  not  general  and  may  be 
difficult  to  understand  or  use.  Some  sequences  may  even  be  available  in  a  monitor  or 
other  systems  program.  Then  those  sequences  can  be  replaced  with  calls  to  the  systems 
program  as  long  as  the  return  is  handled  properly. 

Some  methods  that  reduce  execution  time  also  reduce  memory  usage.  In  particular, 
ehminating  redundant  operations,  reorganizing  loops,  using  the  stack,  organizing  the 
use  of  registers,  using  the  16-bit  registers,  using  block  instructions  and  short  forms, 
operating  directly  on  memory  or  registers,  and  minimizing  the  use  of  the  index 
registers  and  special  Z80  instructions  reduce  both  memory  usage  and  execution  time. 
Of  course,  using  in-line  code  rather  than  loops  and  subroutines  reduces  execution  time 
but  increases  memory  usage.  Absolute  and  relative  jumps  represent  a  minor  tradeoff 
between  memory  and  execution  time;  absolute  jumps  are  faster  (if  a  branch  occurs)  but 
use  more  memory. 

Lookup  tables  generally  use  extra  memory  but  save  execution  time.  Some  ways  to 
reduce  their  memory  requirements  are  to  ehminate  intermediate  values  and  interpo- 
late the  resuhs,  eliminate  redundant  values  with  special  tests,  and  reduce  the  range  of 
input  values.  i '  Often  a  few  prior  tests  or  restrictions  will  greatly  reduce  the  size  of  the 
required  table. 
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Chapter  2  Implemeiiting 
Additiorial  Instructions  and 
Addressing  Modes 


This  chapter  shows  how  to  implement  instructions  and  addressing  modes  that  are 
not  included  in  the  Z80  instruction  set.  Of  course,  no  instruction  set  can  ever  include  all 
possible  combinations.  Designers  must  choose  a  set  based  on  how  many  operation 
codes  are  available,  how  easily  an  additional  combination  could  be  implemented,  and 
how  often  it  would  be  used.  A  description  of  additional  instructions  and  addressing 
modes  does  not  imply  that  the  basic  instruction  set  is  incomplete  or  poorly  designed. 

The  chapter  will  concentrate  on  addhional  instructions  and  addressing  modes  that 
are 

•  Obvious  parallels  to  those  included  in  the  instruction  set. 

•  Described  in  Fischer's  "Microprocessor  Assembly  Language  Standard". ' 

•  Discussed  in  Volume  1  of  An  Introduction  to  Microcomputers.- 

•  Implemented  on  other  microprocessors,  especially  ones  that  are  closely  related  or 
partly  compatible.  ^ 

This  chapter  should  be  of  particular  interest  to  those  who  are  familiar  with  the 
assembly  languages  of  other  computers. 


In  describing  extensions  to  the  instruction  set,  we  follow  the  organization  sug- 
gested in  the  draft  standard  for  IEEE  Task  P694.'»  Instructions  are  divided  into  the 
following  groups  (Usted  in  the  order  in  which  they  are  discussed):  arithmetic,  logical, 
data  transfer,  branch,  skip,  subroutine  call,  subroutine  return,  and  miscellaneous. 
For  each  type  of  instruction,  types  of  operands  are  discussed  in  the  following  order: 
byte  (8-bit),  word  (16-bit),  decimal,  bit,  nibble  or  digit,  and  multiple.  In  describing 
addressing  modes,  we  use  the  following  order:  direct,  indirect,  immediate,  indexed. 


INSTRUCTION  SET  EXTENSIONS 
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register,  autopreincrement,  autopostincrement,  autopredecrement,  autopostdecre- 
ment,  indirect  preindexed  (also  called  preindexed  or  indexed  indirect),  and  indirect 
postindexed  (also  called  postindexed  or  indirect  indexed). 

ARITHMETIC  INSTRUCTIONS 

This  group  includes  addition,  addition  with  Carry,  subtraction,  subtraction  in 
reverse,  subtraction  with  Carry  (borrow),  increment,  decrement,  multipHcation,  divi- 
sion, comparison,  two's  complement  (negate),  and  extension.  Instructions  that  do  not 
clearly  fall  into  a  particular  category  are  repeated  for  convenience. 

Addition  Instructions  (Without  Carry) 

1.  Add  memory  location  ADDR  to  accumulator. 

LD      HL,ADDR       ; POINT  TO  DATA 
ADD     A, (HL)         jTHEN  ADD  IT 

2.  Add  Carry  to  accumulator. 

ADC     A,0  ;AC.C  =  ACC  +  CARRY  +  0 

.3.  Decimal  add  Carry  to  accumulator 

ADC     A,0  ;ACC  =  ACC  +  CARRY  +  0 

DAA  ;     IN  DECIMAL 

4.  Decimal  add  VALUE  to  accumulator. 

ADD     A, VALUE       sACC  =  ACC  +  VALUE 
DAA  J      IN  DECIMAL 

5.  Decimal  add  register  to  accumulator. 

ADD    A.reg  ;  ACC  =  ACC  ■*■  REG 

DAA  ;     IN  DECIMAL 

6.  Add  16-bit  number  VAL16  to  HL. 

LD  rp,VAL16 

ADD    HL,rp  fHL  =  HL  +  VAL16 

rp  can  be  either  BC  or  DE. 

7.  Add  16-bit  number  VAL16  to  an  index  register. 

LD  rp,VAL16 

ADD     xy.rp  jXY  =  XY  +  VAL16 

rp  can  be  either  BC  or  DE. 
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8.  Add  memory  locations  ADDR  and  ADDR+1  (MSB  in  ADDR+1)  to  HL. 

LD  rp,(ADDR) 
ADD  HL.rp 

The  16-bit  data  is  stored  in  the  usual  Z80  format  with  the  less  significant  byte  first  (at 
the  lower  address). 

9.  Add  memory  locations  ADDR  and  ADDR+ 1  (MSB  in  ADDR+1)  to  an  index 
register 

LD  rp,(ADDR) 
ADD  xy.rp 

10.  Add  memory  locations  ADDR  and  ADDR+ 1  (MSB  in  ADDR+ 1 )  to  memory 
locations  SUM  and  SUM+1  (MSB  in  SUM+1). 

LD  HL,  (SUM.)  ;GET  CURRENT  SUM 

LD  DE, (ADDR)  ; ADD  ELEMENT 

ADD  HL, DE 

LD  (SUM),HL  jSAVE  UPDATED  SUM 

11.  Add  the  16-bit  number  VAL16  to  memory  locations  ADDR  and  ADDR+1 
(MSB  in  ADDR+1). 

LD  HL,  (SUM.)  ;GET  CURRENT  SUM 

LD  DE,VAL16  ; ADD  ELEMENT 

ADD  HL,DE 

LD  (SUM.),HL  ;SAVE  UPDATED  SUM 


Addition  instructions  (with  Oorry) 

1.  Add  memory  location  ADDR  to  accumulator  with  Carry. 

LD      HL.ADDR  ; POINT  TO  DATA 

ADC     A, (HL)  ;THEN  ADD  IN  DATA 

2.  Add  Carry  to  accumulator. 

ADC     A,0  J ACC  =  ACC  +  CARRY  +  0 

3.  Decimal  add  VALUE  to  accumulator  with  Carry. 

ADC     A, VALUE  jACC  =  ACC  +  VALUE  +  CARRY 

DAA  !      IN  DECIMAL 

4.  Decimal  add  register  to  accumulator  with  Carry. 

ADC     A,reg  jACC  =  ACC  +  REG  +  CARRY 

DAA  !     IN  DECIMAL 
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5.  Add  16-bit  number  VAL16  to  HL  with  Carry. 

LD  rp,VAL16 

ADC     HL,rp  jHL  =  HL  +  VAL16  +  CARRY 

6.  Add  memory  locations  ADDR  and  ADDR+1  (MSB  in  ADDR+1)  to  HL  with 
Carry. 

LD      rp,  (ADDR.) 

ADC     HL,rp  jHL  =  HL  +  ,(ADDR.i   +  CARRY 


Subtraction  instructions  ^Without  Borrow) 

1.  Subtract  memory  location  ADDR  from  accumulator. 

LD      HL,ADDR  j POINT  TO  DATA 

SUE     (HL.)  jTHEN  SUBTRACT  IT 

2.  Subtract  borrow  (Carry)  from  accumulator. 

SBC     A,0  !ACC  =  ACC  -  CARRY 

3.  Decimal  subtract  VALUE  from  accumulator. 

SUE     VALUE  !ACC  =  ACC  -  VALUE 

DAA  ;      IN  DECIMAL 

4.  Decimal  subtract  register  from  accumulator. 

SUB    reg  ;ACC  =  ACC  -  REG 

DAA  ;      IN  DECIMAL 

Since  the  Z80  has  an  Add  /  Subtract  flag,  it  can  perform  decimal  subtraction  directly. 
On  the  8080  and  8085  processors,  the  programmer  must  implement  decimal  subtrac- 
tion as  the  addition  of  a  negative  number. 

5.  Subtract  register  pair  from  HL. 

AND     A  ■ CLEAR  CARRY 

SBC     HL,rp  ; SUBTRACT  REGISTER  PAIR  WITH  CARRY 

The  Z80  has  a  subtract  register  pair  with  Carry  instruction,  but  no  plain  subtract 
register  pair  (without  Carry). 

6.  Subtract  16-bit  number  VAL16  from  HL. 

LD  rp,-VAL16 
ADD  HL,rp 


or 


AND     A  ; CLEAR  CARRY 

LD  rp,VAL16 

SBC    HL,rp  ; SUBTRACT  16-BIT  NUMBER  FROM  HL 
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rp  can  be  either  BC  or  DE.  Carry  is  an  inverted  borrow  in  the  first  alternative  and  a  true 
borrow  in  the  second.  The  first  alternative  is  obviously  much  shorter,  particularly  since 
SBC  HL  requires  a  2-byte  operation  code. 

7.  Subtract  memory  locations  ADDR  and  ADDR+1  (MSB  in  ADDR+1)  from 
HL. 

AND     A  ; CLEAR  CARRY 

LD      rp,(ADDR.)  f  THEN  SUBTRACT  WITH  CARRY 

SBC  HL,rp 

There  is  no  subtract  register  pair  (without  Carry)  instruction. 


Subtraction  in  Reverse  Instructions 

1.  Subtract  accumulator  from  VALUE  and  place  difference  in  accumulator. 

NEC  ; NEGATE  A 

ADD  A, VALUE  ; FORM  -  A  +  VALUE 

or 

LD  reg,A  ! CALCULATE  VALUE  -  ACC 

LD  A, VALUE 

SUE  reg 

The  Carry  is  an  inverted  borrow  in  the  first  method  and  a  true  borrow  in  the  second. 

2.  Subtract  accumulator  from  register  and  place  difference  in  accumulator 

NEG  (NEGATE  A 

ADD    A, reg  ! FORM  -  A  +  REG 

The  Carry  is  an  inverted  borrow;  that  is,  it  is  1  if  the  subtraction  does  not  require  a 
borrow. 

3.  Decimal  subtract  accumulator  from  VALUE  and  place  difference  in  accumu- 
lator 

LD       reg, A  ; CALCULATE  VALUE  -  ACC 

LD      A, VALUE 
SUB  reg 
DAA 

4.  Decimal  subtract  accumulator  from  register  and  place  difference  in  accumulator. 

LD  regl,A  ; CALCULATE  REG  -  ACC 

LD  A, reg 

SUB  regl 

DAA  ;IN  DECIMAL 


76    Z80  ASSEMBLY  LANGUAGE  SUBROUTINES 


Subtraction  with  Borrow  (Carry)  Instructions 

1.  Subtract  memory  location  ADDR  from  accumulator  with  borrow. 

LD      HL,ADDR  ; POINT  TO  DATA 

SBC.     A,  <HL.l  ;  THEN  SUBTRACT  WITH  BORROW 

2.  Subtract  borrow  (Carry)  from  accumulator. 

SBC     A,0  ;FORM  A  -  BORROW 

3.  Decimal  subtract  inverted  borrow  from  accumulator  (Carry  =  1  if  no  borrow 
was  generated,  0  if  a  borrow  was  generated). 

ADC     A,99H  ;ADD  99  PLUS  CARRY 

DAA 

The  final  Carry  is  1  if  the  subtraction  generates  a  borrow  and  0  if  it  does  not. 

4.  Decimal  subtract  VALUE  from  accumulator  with  borrow. 

SBC     A, VALUE  -A  =  A  -  VALUE  -  BORROW 

DAA  ;      IN  DECIMAL 

5.  Decimal  subtract  register  from  accumulator  with  borrow. 

SEC     A,reg  jA  =  A  -  REG  -  BORROW 

DAA  ;      IN  DECIMAL 

6.  Subtract  16-bit  number  VAL16  from  HL  with  borrow. 

LD  rp,VAL16 

SBC    HL,rp  ;HL  =  HL  -  VAL16  -  BORROW 

Increment  Instructions 

1.  Increment  memory  location  ADDR. 

LD  HL,ADDR 
INC  (HLJ 

2.  Increment  accumulator,  setting  the  Carry  flag  if  the  result  is  0. 

ADD     A, 1 

Remember  that  INC  does  not  affect  Carry,  but  it  does  affect  the  Zero  flag. 
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3.  Decimal  increment  accumulator  (add  1  to  A  in  decimal). 

ADD     A, 1 
DAA 

You  cannot  use  INC,  since  it  does  not  affect  Carry. 

4.  Decimal  increment  register  (add  1  to  reg  in  decimal). 

LD      A, reg 
ADD     A, 1 
DAA 

LD      reg, A 
DAA  applies  only  to  the  accumulator. 

5.  Increment  memory  locations  ADDR  and  ADDR+1  (MSB  in  ADDR  +  1). 

LD      HL,  (ADDR.> 

INC     HL  ;  1(S-EIT  INCREMENT 

LD  (ADDR),HL 


or 

LD  HL,ADDR 

INC  CHL.)  ;  INCREMENT  LSE 

JR  NZ , DONE 

INC  HL  ;ADD  CARRY  TO  MSB 

INC  (.HL.) 

DEC  HL 
DONE!  NOP 

The  second  alternative  leaves  ADDR  in  HL  for  later  use. 

6.  Increment  register  pair,  setting  the  Zero  flag  if  the  result  is  0. 

INC     rp  ; 16-BIT  INCREMENT 

LD      A,rpl  jTEST  RESULT  FOR  ZERO 

OR  rph 

This  sequence  destroys  the  old  contents  of  the  accumulator  and  the  flags.  OR  clears 
Carry. 


Decrement  Instructions 

1.  Decrement  memory  location  ADDR. 

LD  HL,ADDR 
DEC  (HL> 
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2.  Decrement  accumulator,  setting  Carry  flag  if  a  borrow  is  generated. 
SUB  1 


3.  Decrement  accumulator,  setting  Carry  flag  if  no  borrow  is  generated. 
ADD  A,OFFH 


4.  Decimal  decrement  accumulator  (subtract  1  from  A  in  decimal). 

SUE  1 
DAA 

DEC  cannot  be  used  here,  since  it  does  not  affect  Carry. 

5.  Decimal  decrement  register  (subtract  1  from  reg  in  decimal). 

LD      A, reg 
SUB  1 
DAA 

LD      reg, A 
DAA  applies  only  to  the  accumulator. 


6.  Decrement  memory  locations  ADDR  and  ADDR+1  (MSB  in  ADDR+1). 
LD      HL, (ADDR) 

DEC     HL  ; 16-BIT  DECREMENT 

LD  (ADDR>,HL 


7.  Decrement  register  pair,  setting  the  Zero  flag  if  the  result  is  0. 

DEC     rp  ; 16-BIT  DECREMENT 

LD       A,rpl  J  TEST  16-BIT  RESULT  FOR  ZERO 

OR  rph 

This  sequence  destroys  the  old  contents  of  the  accumulator  and  changes  the  other 
flags.  OR  clears  the  Carry  flag. 


Multiplication  Instructions 


1.  Multiply  accumulator  by  2. 
ADD     A, A 


2.  Multiply  accumulator  by  .3  (using  reg  for  temporary  storage). 

LD      reg, A  ; SAVE  A 

ADD     A, A  ;2  X  A 

ADD     A, reg  ;3  X  A 
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3.  Multiply  accumulator  by  4. 

ADD    A, A  ;2  X  A 

ADD     A, A  !4  X  A 

We  can  easily  extend  cases  1 ,  2,  and  3  to  multiplication  by  other  small  integers. 

4.  Multiply  register  by  2. 

SLA  reg 

5.  Multiply  register  by  4. 

SLA     reg  j MULT I PLY  BY  2 

SLA     reg  ;AND  THEN  BY  2  AGAIN 

Since  SLA  is  a  2-byte  instruction,  it  eventually  becomes  faster  to  move  the  data  to  the 
accumulator  and  use  the  1-byte  instruction  ADD  A,  A. 

6.  Multiply  register  pair  HL  by  2. 

ADD  HL,HL 


7.  Multiply  register  pair  HL  by  3  (using  rp  for  temporary  storage). 

LD  rph,H 

LD  rpl,L 

ADD  HL,HL                    ; 2  X  HL 

ADD  HL,rp                    j3  X  HL 

Note  that  you  cannot  use  EX  DE,HL  here,  since  it  changes  HL. 


8.  Multiply  an  index  register  by  2. 
ADD  >!y,xy 


9.  Multiply  memory  locations  ADDR  and  ADDR+1  (MSB  in  ADDR+I)  by  2. 
LD  HL,ADDR 

SLA     (HL)  ; SHI FT  LSB  LEFT  LOGICALLY 

INC  HL 

RL       (HL)  I  THEN  ROTATE  MSB  TO  PICK  UP  CARRY 


or 


LD  xy,ADDR 

SLA     (xy+0)  jSHIFT  LSB  LEFT  LOGICALLY 

RL       (xy+1)  ;THEN  ROTATE  MSB  TO  PICK  UP  CARRY 


Note  that  you  must  rotate  the  more  significant  byte  to  pick  up  the  Carry  produced  by 
shifting  the  less  significant  byte. 
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Division  Instructions 


Divide  accumulator  by  2  unsigned. 


SRL  A 


; DIVIDE  BY  2,   CLEARIIMO  SIGN 


2, 


Divide  accumulator  by  4  unsigned. 


SRL 
SRL 


A 
A 


; DIVIDE  BY  2,  CLEARING  SIGN 
fTHEN  BY  2  AGAIN 


or 


RRA 
RRA 
AND 


0011  111  IB 


; ROTATE  A  RIGHT  TWICE 


liTHEN  CLEAR  2  MSB'S 


Since  SRL  is  a  2-byte  instruction,  it  eventually  becomes  faster  to  use  the  1-byte 
instruction  RRA  and  clear  the  more  significant  bits  exphcitly  at  the  end. 

3.  Divide  accumulator  by  2  signed. 


4.  Divide  memory  locations  ADDR  and  ADDR+1  (MSB  in  ADDR+1)  by  2 
unsigned. 

LD  XY,ADR 

SRL      (XY+1)  ; SHIFT  MSB  RIGHT  LOGICALLY 

RR        (XY+0)  sTHEN  ROTATE  LSB  RIGHT 

Rotating  the  less  significant  byte  picks  up  the  Carry  from  the  more  significant  byte. 


5.  Divide  memory  locations  ADDR  and  ADDR+1  (MSB  in  ADDR+1)  by  2 
signed. 

LD  XY,ADR 

SRA      (XY+1)  ; SHIFT  MSB  RIGHT  ARITHMETICALLY 

RR        (XY+O)  ;THEN  ROTATE  LSB  RIGHT 


6.  Divide  register  pair  by  2  unsigned. 

SRL     rph  J  SHIFT  MSB  RIGHT  LOGICALLY 

RR      rpl  jTHEN  ROTATE  LSB  RIGHT 


7.  Divide  register  pair  by  2  signed. 

SRA     rph  ; SHIFT  MSB  RIGHT  ARITHMETICALLY 

RR      rpl  jTHEN  ROTATE  LSB  RIGHT 


SRA  A 


? DIVIDE  BY  2,   EXTENDING  SIGN 
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Comparison  Instructions 

1.  Compare  VALUE  with  accumulator  bit  by  bit,  setting  each  bit  position  that  is 
different. 

XOR  VALUE 

Remember,  the  EXCLUSIVE  OR  of  two  bits  is  I  if  and  only  if  the  two  bits  are  different. 

2.  Compare  register  with  accumulator  bit  by  bit,  setting  each  bit  position  that  is 
different. 

XOR  reg 

3.  Compare  register  pairs  (rp  and  HL).  Set  Carry  if  rp  is  larger  (unsigned)  than  HL 
and  clear  Carry  otherwise. 

AND     A  ; CLEAR  CARRY 

SEC  HL,rp 

This  sequence  changes  HL. 

4.  Compare  register  pair  HL  with  16-bit  number  VAL16. 

LD       rp,-VAL16  ; FORM  HL  -  VAL16  BY  ADDING 

ADD  HL,rp 

or 

AND     A  ;  CLEAR  CARRY 

LD  rp,VAL16 
SBC  HL,rp 

Carry  is  an  inverted  borrow  after  the  first  alternative  and  a  true  borrow  after  the 
second.  Both  sequences  change  HL  and  rp. 

5.  Compare  index  register  with  16-bh  number  VAL16.  Clear  Carry  if  VAL16  is 
greater  than  index  register  and  set  Carry  otherwise. 

LD      rp,-VAL16  jFORM  INDEX  REGISTER  -  VAL16 

ADD  xy,rp 

Carry  is  an  inverted  borrow  here,  since  we  are  subtracting  by  adding  the  two's 
complement. 

6.  Compare  register  pair  with  memory  locations  ADDR  and  ADDR+1  (MSB  in 
ADDR+1). 

AND     A  ; CLEAR  CARRY 

LD      rp,(ADDR)  ; SUBTRACT  REGISTER  PAIR 

SBC  HL,rp 

Carry  is  a  true  borrow. 
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7.  Compare  index  register  with  memory  locations  ADDR  and  ADDR+ 1  (MSB  in 
ADDR+1). 

PUSH  xy  jMOVE  INDEX  REGISTER  TO  HL 

POP  HL 

AND  A  ;  CLEAR  CARRY 

LD  rp,(ADDR)  jFORM  INDEX  REGISTER  -  OTHER  OPERAND 

SBC  HL,rp 

The  Z80  has  no  SBC  xy  instruction. 


8.  Compare  stack  pointer  with  the  16-bit  number  VAL16. 

LD  HL,0  sMOVE  STACK  POINTER  TO  HL 

ADD  HL,SP 

LD  rp,-VAL16 

ADD  HL, rp 

Carry  is  an  inverted  borrow. 


9.  Compare  stack  pointer  with  memory  locations  ADDR  and  ADDR+l  (MSB  in 
ADDR+1). 

LD  HL,0  ;MOVE  STACK  POINTER  TO  HL 

ADD  HL,SP 

LD  rp,(ADDR> 

AND  A  ; CLEAR  CARRY 

SBC  HL,rp  jFORM  SP  -  MEMORY 

Carry  is  a  true  borrow. 


Two's  Complement  (Negate)  instructions 


1.  Negate  register. 

SUB     A  jFORM  0  -  REG 

SUB  reg 
LD  reg,A 


LD  A,reg 
NEC 

LD  reg,A 


2.  Negate  memory  location  ADDR. 


SUB  A 

LD  HL,ADDR 
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or 


SUE     (HL.)  jFORM  0  -  (MEMORY) 

LD  (HL),A 


LD  HL,ADDR 

LD      A, (HL)  ;FORM  -  (ADDR) 


NEG 

LD  (HL),A 


3.  Negate  register  pair. 

LD  A,rph  ; 16-BIT  ONE'S  COMPLEMENT 

CPL 

LD  rph,A 

LD  A.rpl 
CPL 

LD  rpl.A 

INC  rp  ;ADD  1  FOR  TWO'S  COMPLEMENT 


or 


LD      HL,0  sFORM  0  -  (RP) 

AND     A  !  CLEAR  CARRY 

SBC  HL,rp 

The  second  sequence  leaves  the  negative  in  HL;  it  can  then  be  moved  easily  to  another 
register  pair. 


4.  Negate  memory  locations  ADDR  and  ADDR+1  (MSB  in  ADDR+1). 

LD  HL,0  fFORM  0  -  (MEMORY) 

LD  rp, (ADDR) 

AND  A 

SBC  HL, rp 

LD  (ADDR),HL 


5.  Nine's  complement  accumulator  (that  is,  replace  (A)  with  99— (A)). 

LD  reg,A 
LD  A,99H 
SUB  reg 

No  DAA  is  necessary,  since  99  —  (A)  is  always  a  valid  BCD  number  if  the  accumulator 
originally  contained  a  valid  BCD  number. 


6.  Ten's  complement  accumulator  (that  is,  replace  (A)  with  100— (A)). 


NEG 
DAA 


;FORM  0  -  ACCUMULATOR 
J  THEN  DECIMAL  ADJUST 
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Extend  Instructions 

1 .  Extend  accumulator  to  a  16-bit  unsigned  number  in  a  register  pair. 

LD      rpl,A  ?8-BIT  MOVE 

LD       rph,0  ; EXTEND  8  BITS  TO  16  BITS 

This  procedure  allows  you  to  use  the  value  in  the  accumulator  as  an  index.  ADD  HL 
or  ADD  xy  will  then  add  the  index  to  the  base. 


2.  Extend  accumulator  to  a  16-bit  signed  number  in  a  register  pair. 

LD  rpl.A  ; 8-BIT  MOVE 

ADD  A, A  ;MOVE  SIGN  BIT  TO  CARRY 

SBC  A, A  ; SUBTRACT  SIGN  BIT  FROM  ZERO 

LD  rph,A  ; EXTEND  8  BITS  TO  16  BITS  SIGNED 


SBC  A,  A  produces  00  if  Carry  is  0  and  FF,f,  if  Carry  is  1.  It  thus  extends  Carry 
across  the  entire  accumulator. 


.3.  Extend  memory  location  ADDR  to  a  16-bit  signed  number  in  memory  locations 
ADDR  (LSB)  and  ADDR+1  (MSB). 

LD  HL,ADDR  ; FETCH  NUMBER 

LD  A, iHL> 

ADD  A, A  jMOVE  SIGN  TO  CARRY 

SBC  A.  A  jFORM  SIGN  BYTE  (00  OR  FF.> 

INC  HL  ! STORE  SIGN  BYTE 

LD  (HL.1,A 


4.  Extend  bit  0  of  accumulator  across  entire  accumulator;  that  is,  (A)  =  00  if  bit  0  = 
Oand  FFifiif  bitO=  1. 

RRA  ;MOVE  BIT  0  TO  CARRY 

SBC     A, A  jFORM  0  -  BIT  0 


5.  Sign  function.  Replace  the  value  in  the  accumulator  by  00  if  it  is  positive  and  by 
FFi6  if  it  is  negative. 


ADD    A, A 

SBC     A. A 


J  MOVE  SIGN  BIT  TO  CARRY 
;FORM  0  -  SIGN  BIT 
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LOGICAL  INSTRUCTIONS 

This  group  includes  logical  AND,  logical  OR,  logical  EXCLUSIVE  OR,  logical 
NOT  (complement),  shift,  rotate,  and  test  instructions.  Also  included  are  arithmetic 
instructions  (such  as  adding  the  accumulator  to  itself)  that  perform  logical  functions. 


Logical  AND  instructions 

1.  Clear  bits  of  accumulator 

AND    MASK  ! CLEAR  BITS  BY  MASKING 

MASK  has  O's  in  the  bit  positions  to  be  cleared  and  I's  in  the  positions  to  be  left 
unchanged.  For  example: 

AND     UOUOllB  !  CLEAR  BITS  2  AND  5 

Remember,  logically  ANDing  a  bit  with  1  does  not  affect  its  value.  Since  RES  can  clear 
only  one  bit  at  a  time,  the  following  sequence  would  be  needed  to  produce  an 
equivalent  result: 

RES     2, A  ! CLEAR  BIT  2 

RES     5, A  sAND  THEN  CLEAR  BIT  5 

2.  Bit  test — set  the  flags  as  if  accumulator  had  been  logically  ANDed  with  a  register 
or  memory  location,  but  do  not  change  the  accumulator. 

LD  reg,A  jSAVE  ACCUMULATOR 

LD  HL,ADDR 

AND  (HL)  J  PERFORM  LOGICAL  AND 

LD  A,reg  j RESTORE  ACCUMULATOR 

LD  does  not  affect  any  flags. 

3.  Test  bits  of  accumulator.  Set  the  Zero  flag  to  1  if  all  the  tested  bits  are  0  and  to  0 
otherwise. 

AND    MASK  5  TEST  BITS  BY  MASKING 

MASK  has  1  's  in  the  positions  to  be  tested  and  O's  elsewhere.  The  Zero  flag  is  set  to  1 
if  all  the  tested  bit  positions  are  0,  and  to  0  otherwise.  Since  the  BIT  instruction  can  test 
only  one  bit  position  at  a  time,  AND  MASK  is  equivalent  to  a  sequence  of  BIT 
instructions  and  conditional  jumps.  For  example: 


AND     01 000001  OB 


jTEST  BITS  1  AND  6  FOR  ZERO 
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is  equivalent  to  the  sequence 

BIT     6, A  jTEST  BIT  6  FOR  ZERO 

JR      NZ,DONE  ; BRANCH  IF  IT  IS  NOT  ZERO 

BIT     1,A  J  THEN  TEST  BIT  1  FOR  ZERO 

DONE:  NOP 

4.  Logical  AND  immediate  with  flags  (condition  codes).  Logically  AND  a  byte  of 
immediate  data  with  the  Flag  register,  clearing  those  flags  that  are  logically  ANDed 
with  O's. 

PUSH  AF  J  MOVE  AF  TO  A  REGISTER  PAIR 

POP  rp 

LD      A, MASK  ; CLEAR  FLAGS 

AND    rp 1 
LD  rpl,A 

PUSH  rp  J  RESTORE  AF  WITH  FLAGS  CLEARED 

POP  AF 

This  sequence  changes  a  register  pair  (BC,  DE,  or  HL). 


Logical  OR  Instructions 


1.  Set  bits  of  accumulator. 

OR      MASK  5 SET  BITS  BY  MASKING 

MASK  has  I's  in  the  bit  positions  to  be  set  and  O's  elsewhere.  For  example: 

OR      OOOlOOlOB  J  SET  BITS  1  AND  4 

Remember,  logically  ORing  a  bit  with  0  does  not  affect  its  value.  Since  SET  can  set 
only  one  bit  at  a  time,  we  would  need  the  following  sequence  to  produce  the  same 
result: 

SET     1,A  ;SET  BIT  1 

SET     4, A  ;AND  THEN  SET  BIT  4 


2.  Test  a  register  pair  for  0.  Set  the  Zero  flag  if  both  halves  of  a  register  pair  are  0. 

LD      A,rph  ;TEST  REGISTER  PAIR  FOR  ZERO 

OR  rpl 

The  Zero  flag  is  set  if  and  only  if  both  halves  of  register  pair  rp  are  0.  The  accumulator 
and  the  other  flags  are  also  changed. 

3.  Logical  OR  immediate  with  flags  (condition  codes).  Logically  OR  a  byte  of 
immediate  data  with  the  flag  register,  setting  those  flags  that  are  logically  ORed  with 
I's. 

PUSH  AF  ;MOVE  AF  TO  A  REGISTER  PAIR 

POP  rp 
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LD      A, MASK  fSET  FLAGS 

OR  rpl 
LD      rpl, A 

PUSH  rp  ! RESTORE  AF  WITH  FLAGS  SET 

POP  AF 

This  sequence  changes  a  register  pair  (BC,  DE,  or  HL). 


Logical  EXCLUSIVE  OR  Instructions 

1.  Complement  bits  of  accumulator. 

XOR     MASK  ; COMPLEMENT  BITS  BY  MASKING 

MASK  has  1  's  in  the  bit  positions  to  be  complemented  and  O's  in  the  positions  that  are 
to  be  left  unchanged.  For  example: 

XOR     llOOOOOOB  ; COMPLEMENT  BITS  6  AND  7 

Remember,  logically  EXCLUSIVE  ORing  a  bit  with  0  leaves  it  unchanged. 

2.  Complement  accumulator,  setting  flags. 

XOR     IIIUIUB  ;  INVERT  AND  SET  FLAGS 

Logically  EXCLUSIVE  ORing  with  all  I's  inverts  all  the  bits.  This  instruction  differs 
from  CPL  only  in  that  it  affects  the  flags,  whereas  CPL  does  not. 

3.  Compare  register  with  accumulator  bit  by  bit,  setting  each  bit  position  that  is 
different. 

XOR    reg  sBIT  BY  BIT  COMPARISON 

The  EXCLUSIVE  OR  function  is  the  same  as  a  "not  equal"  function.  Note  that  the 
Sign  flag  is  1  if  the  two  operands  have  different  values  in  bit  7. 

4.  Add  register  to  accumulator  logically  (that  is,  without  any  carries  between  bit 
positions). 

XOR    reg  j LOGICAL  ADDITION 

The  EXCLUSIVE  OR  function  is  also  the  same  as  a  bit-by-bit  sum  with  no  carries. 
Logical  sums  are  often  used  to  form  checksums  and  error-detecting  or  error-correcting 
codes. 


Logical  NOT  Instructions 

1.  Complement  accumulator,  setting  flags. 
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XOR     UUIUIB  ;  INVERT  AND  SET  FLAGS 

Logically  EXCLUSIVE  ORing  with  all  I's  inverts  all  the  bits.  This  instruction  differs 
from  CPL  only  in  that  it  affects  the  flags,  whereas  CPL  does  not. 

2.  Complement  bits  of  accumulator. 

XOR    MASK  ! COMPLEMENT  BIT  BY  MASKING 

MASK  has  1  's  in  the  bit  positions  to  be  complemented  and  O's  in  the  positions  that  are 
to  be  left  unchanged.  For  example: 

XOR     OlOlOOOlB  ; COMPLEMENT  BITS  0,   4,   AND  6 

Remember,  logically  EXCLUSIVE  ORing  a  bit  with  0  leaves  it  unchanged. 

3.  Complement  memory  location  ADDR. 

LD  HL,ADDR 

LD  A, (HL)  ; OBTAIN  DATA 

CPL  ; COMPLEMENT 

LD  (HL),A  J  RESTORE  RESULT 

CPL  applies  only  to  the  accumulator. 

4.  Complement  bit  0  of  a  register. 

INC  reg 

or 

DEC  reg 

Either  instruction  may,  of  course,  affect  the  other  bits  in  the  register.  The  final  value  of 
bit  0  will  surely  be  0  if  it  was  originally  1  and  if  it  was  originally  0. 

5.  Complement  bit  0  of  a  memory  location. 

LD  HL,ADDR 

INC  (HL) 

or 

LD  HL,ADDR 

DEC  (HL) 

6.  Complement  digit  of  accumulator. 
■  Less  significant  digit 

XOR    00001 11  IB  J  COMPLEMENT  LESS  SIGNIFICANT  DIGIT 
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•  More  significant  digit 

XOR     iniOOOOB  J  COMPLEMENT  MORE  SIGNIFICANT  DIGIT 

These  procedures  are  useful  if  the  accumulator  contains  a  decimal  digit  in  negative 
logic,  such  as  the  input  from  a  typical  ten-position  rotary  or  thumbwheel  switch. 

7.  Complement  a  register  pair. 

LD      HL,OFFFFH  ?SET  HL  TO  ALL  ONES 

AND    A  ; CLEAR  CARRY 

SBC    HL,rp  J  SUBTRACT  REGISTER  PAIR  FROM  ALL  ONES 
The  result  ends  up  in  HL. 

Shift  Instructions 

1.  Shift  accumulator  left  logically. 

ADD     A, A  ; SHIFT  A  LEFT  LOGICALLY 

Adding  the  accumulator  to  itself  is  equivalent  to  a  logical  left  shift. 

2.  Shift  register  pair  HL  left  logically. 

ADD     HL,HL  ; SHI FT  HL  LEFT  LOGICALLY 

3.  Shift  index  register  left  logically. 

ADD     xy.xy  ; SHIFT  IX  OR  lY  LEFT  LOGICALLY 

4.  Shift  register  pair  right  logically. 

SRL     rph  J  SHIFT  MSB  RIGHT  LOGICALLY 

RR      rpl  ;AND  THEN  ROTATE  LSB  RIGHT 

The  key  point  here  is  that  the  less  significant  byte  must  be  rotated  to  pick  up  the  Carry 
from  the  logical  shifting  of  the  more  significant  byte. 

5.  Shift  register  pair  right  arithmetically. 

SRA     rph  ; SHIFT  MSB  RIGHT  ARITHMETICALLY 

RR      rpl  ?AND  THEN  ROTATE  LSB  RIGHT 

The  rotation  of  the  less  significant  byte  is  the  same  as  in  the  logical  shift. 

6.  Shift  memory  locations  ADDR  and  ADDR+1  (MSB  in  ADDR+1)  left 
logically. 
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LD 
SLA 


HL,ADDR 
(HL) 


INC  HL 
RL  (HL) 


J  SHIFT  LSB  LEFT  LOGICALLY 
;AND  THEN  ROTATE  MSB  LEFT 


or 


LD 

SLA 

RL 


xy, ADDR 

(xy+0) 

(xy+i) 


; SHIFT  LSB  LEFT  LOGICALLY 
;AND  THEN  ROTATE  MSB  LEFT 


To  produce  a  16-bit  left  shift,  you  must  shift  the  less  significant  byte  first  and  then 
rotate  the  more  significant  byte. 


7.  Shift  memory  locations  ADDR  and  ADDR+1  (MSB  in  ADDR+1)  right 
logically. 


or 


LD 

SRL 


LD 

SRL 

RR 


HL, ADDR+1 
(HL) 


DEC  HL 
RR  (HL) 


xy, ADDR 

(xy+1) 

(xy+0) 


5  SHIFT  MSB  RIGHT  LOGICALLY 
?AND  THEN  ROTATE  LSB  RIGHT 


; SHIFT  MSB  RIGHT  LOGICALLY 
;AND  THEN  ROTATE  LSB  RIGHT 


8.  Digit  swap  accumulator.  That  is,  exchange  the  four  least  significant  bits  with  the 
four  most  significant  bits. 


or 


RLCA 
RLCA 
RLCA 
RLCA 


RRCA 
RRCA 
RRCA 
RRCA 


; DIGIT  SHIFT  =  4  LEFT  ROTATES 


; DIGIT  SHIFT  =  4  RIGHT  ROTATES 


9.  Normalize  accumulator.  That  is,  shift  the  accumulator  left  until  its  most  signif- 
icant bit  is  1.  Do  not  shift  at  all  if  the  accumulator  contains  0. 

AND  A  sTEST  ACCUMULATOR 

JP  M,DONE  ;EXIT  IF  ALREADY  NORMALIZED 

JR  ZrDONE  jEXIT  IF  ZERO 

SHIFT!         ADD  A, A  ^OTHERWISE,   SHIFT  A  LEFT  1  BIT 

JP  P, SHIFT  J  KEEP  SHIFTING  UNTIL  NORMALIZED 
DONE;  NOP 
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10.  Normalize  register  pair  HL.  That  is,  shift  the  16-bit  number  left  until  its  most 
significant  bh  is  1.  Do  not  shift  the  number  at  all  if  it  is  0. 


LD 

A,H 

;IS  ENTIRE  NUMBER  0? 

OR 

L 

JR 

Z , DONE 

;YES,  DONE 

ADD 

HL,HL 

; SHIFT  NUMBER  LEFT  1  BIT 

JR 

NC, SHIFT 

fKEEP  SHIFTING  UNTIL  CARRY  IS  1 

RR 

H 

?THEN  SHIFT  BACK  ONCE 

RR 

L 

NOP 

SHIFT! 


DONE: 

ADD  HL  affects  the  Carry  but  not  the  Sign  or  Zero  flag. 


Rotate  Instructions 


Rotate  register  pair  right. 


RRC 
RL 
RR 
RR 


rpl 
rpl 
rph 
rpl 


jCOPY  BIT  0  FOR  ROTATION 
; CARRY  =  BIT  0 
; ROTATE  MSB  WITH  BIT  0 
jTHEN  ROTATE  LSB  RIGHT 


The  RRC  rpl  instruction  places  bit  0  both  in  bit  7  and  in  the  Carry  flag;  RL  rpl  then 
restores  the  register  but  leaves  the  original  bit  0  in  the  Carry. 


2.  Rotate  register  pair  left. 


RLC  rph 

RR  rph 

RL  rpl 

RL  rph 


J  COPY  BIT  15  FOR  ROTATION 
SCARRY  =  BIT  15 
; ROTATE  LSB  WITH  BIT  15 
STHEN  ROTATE  MSB  LEFT 


RLC  rph  places  bit  7  of  the  more  significant  byte  both  in  bit  0  and  in  the  Carry.  RR  rph 
then  restores  the  register  but  leaves  the  original  bit  7  (bit  15  of  the  16-bit  register  pair)  in 
the  Carry. 

3.  Rotate  accumulator  left  through  Carry,  setting  flags. 

ADC    A, A  ; ROTATE  LEFT  AND  SET  FLAGS 

This  instruction  is  the  same  as  RLA,  except  that  it  affects  all  the  flags  whereas  RLA 
affects  only  the  Carry. 


4.  Rotate  register  pair  right  through  Carry. 


RR  rph 
RR  rpl 


f ROTATE  MSB  RIGHT  WITH  CARRY 
;THEN  ROTATE  LSB  RIGHT  WITH  CARRY 
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5.  Rotate  register  pair  left  through  Carry. 


RL  rpl 
RL  rph 


{ROTATE  LSB  LEFT  WITH  CARRY 
; ROTATE  MSB  LEFT  WITH  CARRY 


6.  Rotate  memory  locations  ADDR  and  ADDR+1  (MSB  in  ADDR+1)  right  1  bit 
position  through  Carry. 


LD  HL, ADDR+1 

RR  (ML.) 

DEC  HL 

RR  (HL.1 


J  ROTATE  MSB  RIGHT  WITH  CARRY 
jTHEN  ROTATE  LSB  RIGHT  WITH  CARRY 


LD  xy,ADDR 


RR 
RR 


(xy+0) 


; ROTATE  MSB  RIGHT  WITH  CARRY 
jTHEN  ROTATE  LSB  RIGHT  WITH  CARRY 


7.  Rotate  memory  locations  ADDR  and  ADDR+ 1  (MSB  in  ADDR+1)  left  one  bit 
position  through  Carry. 


or 


LD  HL,ADDR 

RL  (HL.1 

INC  HL 

RL  (HL) 


LD  xy,ADDR 
RL  (Ky+O.) 
RL  (xy+l> 


J  ROTATE  LSB  LEFT  WITH  CARRY 
jTHEN  ROTATE  MSB  LEFT  WITH  CARRY 


! ROTATE  LSB  LEFT  WITH  CARRY 
jTHEN  ROTATE  MSB  LEFT  WITH  CARRY 


Test  Instructions 

1.  Test  accumulator.  Set  flags  according  to  the  value  in  the  accumulator  without 
changing  that  value. 

AND     A  jTEST  ACCUMULATOR 

or 

OR      A  J  TEST  ACCUMULATOR 

Both  alternatives  clear  the  Carry. 

2.  Test  register.  Set  flags  according  to  the  value  in  a  register  without  changing  that 
value. 

INC    reg  jTEST  REGISTER 

DEC  reg 


This  sequence  does  not  affect  the  Carry  or  the  accumulator. 
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3.  Test  memory  location.  Set  flags  according  to  the  value  in  memory  location 
ADDR  without  changing  that  value. 

LD      HL,ADDR  ; TEST  MEMORY  LOCATION  ADDR 

INC  (HL) 
DEC  (HL) 

This  sequence  does  not  affect  the  Carry  or  the  accumulator. 

4.  Test  register  pair.  Set  the  Zero  flag  according  to  the  value  in  a  register  pair 
without  changing  that  value. 

LD      A,rph  ;TEST  REGISTER  PAIR 

OR  rpl 

This  sequence  changes  the  accumulator  and  the  other  flags. 

5.  Test  index  register.  Set  the  Zero  flag  according  to  the  value  in  an  index  register 
without  changing  that  value. 

PUSH  xy  SMOVE  INDEX  REO  TO  REGISTER  PAIR 

POP  rp 

LD      A,rph  sTEST  REGISTER  PAIR 

OR  rpl 

This  sequence  changes  a  register  pair,  the  accumulator,  and  the  other  flags. 

6.  Test  a  pair  of  memory  locations.  Set  the  Zero  flag  according  to  the  contents  of 
memory  locations  ADDR  and  ADDR+1. 

LD      HL, <ADDR)  jTEST  A  MEMORY  WORD 

LD  A.H 

OR  L 

This  sequence  changes  HL,  the  accumulator,  and  the  other  flags. 

7.  Test  bits  of  accumulator.  Set  the  Zero  flag  if  all  the  tested  bits  are  O's  and  clear  the 
Zero  flag  otherwise. 

AND    MASK  J  TEST  BITS  BY  MASKING 

MASK  has  1  's  in  the  bit  positions  to  be  tested  and  O's  elsewhere.  The  Zero  flag  is  set 
to  1  if  all  the  tested  bits  are  O's  and  to  0  otherwise.  For  example: 

AND     1000000 IB  jTEST  BITS  0  AND  7 

The  Zero  flag  is  set  to  1  if  bits  0  and  7  of  the  accumulator  are  both  zero,  and  to  0 
otherwise.  The  BIT  instruction,  on  the  other  hand,  can  only  handle  one  bit  at  a  time; 
for  example: 


BIT     7, A 


sTEST  BIT  7 
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To  duplicate  the  AND  instruction,  we  would  need  the  sequence 

BIT  7, A  jTEST  BIT  7 

JR  NZ,DONE  SEXIT  IF  IT  IS  1 

BIT  0,A  jTEST  BIT  0 
DONE:  NOP 


8.  Compare  register  with  accumulator  bit  by  bit.  Set  each  bit  position  that  is 
different  to  1 . 

XOR     reg  jBIT-BY-BIT  COMPARISON 

The  EXCLUSIVE  OR  function  is  the  same  as  a  "not  equal"  function. 


9.  Bit  test.  Set  flags  as  if  the  accumulator  had  been  logically  ANDed  with  a  memory 
location,  but  do  not  change  the  accumulator. 

LD  reg, A  ; SAVE  ACCUMULATOR 

LD  HL,ADDR 

AND  (HL>  ? PERFORM  LOGICAL  AND 

LD  A, reg  {RESTORE  ACCUMULATOR 


DATA  TRANSFER  INSTRUCTIONS 

In  this  group,  we  consider  load,  store,  move,  exchange,  input,  output,  clear,  and  set 
instructions.  We  also  include  arithmetic  instructions  (such  as  subtracting  the  accumu- 
lator from  itself)  that  move  a  specific  value  or  the  contents  of  another  register  to  the 
accumulator  or  other  destination  without  changing  any  data. 

Load  Instructions 

1.  Load  register  direct. 

LD  A,  (ADDR.> 

LD  reg, A 

or 

LD  HL,ADDR 

LD  reg,(HL) 

The  first  alternative  uses  the  accumulator,  while  the  second  alternative  uses  register 
pair  HL. 

2.  Load  register  indirect. 
•  From  address  in  HL 
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LD      reg, (HL> 

•  From  address  in  BC  or  DE 

LD      A, <rp) 
LD      reg, A 

Note  that  only  the  accumulator  can  be  loaded  indirectly  via  BC  or  DE. 

•  From  address  in  an  index  register 

LD      reg, <xy+0) 

3.  Load  flag  register  with  the  8-bit  number  VALUE. 

LD      r pi, VALUE  ;PUT  VALUE  IN  LSB  OF  REGISTER  PAIR 

PUSH  rp  ;MOVE  TO  FLAGS  THROUGH  STACK 

POP  AF 

The  limitation  of  pushing  and  popping  register  pairs  causes  some  unnecessary 
operations. 

4.  Load  interrupt  vector  register  with  the  8-bit  number  VALUE. 

LD      A, VALUE 
LD       I,  A 

5.  Load  refresh  register  with  the  8-bit  number  VALUE. 

LD      A, VALUE 
LD  R,A 

6.  Load  flag  register  direct  from  memory  location  ADDR. 

LD      ML, (ADDR. 1  jLOAD  L  FROM  ADDR 

PUSH  HL  ;HL  TO  STACK,   L  ON  TOP 

POP     AF  jHL  TO  AF  WITH  L  TO  FLAGS 

This  procedure  allows  a  user  to  initialize  the  flag  register  for  debugging  or  testing 
purposes.  Note  that  it  changes  the  accumulator  and  the  less  significant  byte  of  a 
register  pair. 

7.  Load  interrupt  vector  register  direct  from  memory  location  ADDR. 

LD      A, (ADDR) 
LD       I,  A 

8.  Load  refresh  register  direct  from  memory  location  ADDR. 

LD      A,  (ADDR.> 
LD  R,A 
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9.  Load  register  pair  HL  indirect  from  address  in  HL. 

LD  A, (HL)  jLOAD  LSB 

INC  HL 

LD  H, (HL)  f LOAD  MSB 

LD  L,  A 


10.  Load  register  pair  (BC  or  DE)  indirect  from  address  in  HL. 

LD  rpl, (HL)  sLOAD  LSB 

INC  HL 

LD  rph, (HL)  ;LOAD  MSB 

DEC  HL  ; RESTORE  HL  TO  ORIGINAL  VALUE 


11.  Load  alternate  processor  status  (AF')  from  stack. 

POP  AF 

EX  AF,AF- 


12.  Load  memory  locations  PTR  and  PTR+1  (MSB  in  PTR+1)  with  ADDR. 

LD      HL.ADDR  ;GET  INDIRECT  ADDRESS 

LD       (PTR),HL  ; STORE  INDIRECT  ADDRESS  IN  MEMORY 


Store  Instructions 


1.  Store  register  direct. 

LD  A,reg 
LD       (ADDR), A 


LD  HL,ADDR 
LD  (HL),reg 

The  first  alternative  uses  the  accumulator,  whereas  the  second  uses  register  pair  HL. 


2.  Store  register  indirect. 

*  At  address  in  HL 

LD  (HL),reg 

•  At  address  in  DE  or  BC 

LD  A,reg 
LD  (rp),A 

Only  the  accumulator  can  be  stored  at  the  address  in  BC  or  DE. 
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At  address  in  an  index  register 
LD  (xy+0),reg 


3.  Store  flag  register  direct. 

PUSH  AF 
POP  HL 

LD       (ADDR),HL  sF  TO  ADDR,   DESTROY  ADDR+1 


PUSH  AF  ;F  TO  TOP  OF  STACK 

POP    HL  fF  TO  L 


or 


PUSH  AF  ;F  TO  TOP  OF  STACK 

POP    HL  jF  TO  L 

LD      A,L  ;F  TO  A 

STA     ADDR  jF  TO  ADDR 

4.  Store  interrupt  vector  register  direct. 

LD      A,  I 

LD       (ADDR  .5,  A 

5.  Store  refresh  register  direct. 

LD  A,R 

LD       (ADDR,!,  A 

6.  Store  register  pair  (BC  or  DE)  indirect  at  address  in  HL. 

LD       (HL.>,rpl  5 STORE  LSB 

INC  HL 

LD       (HL.),rph  ;  STORE  MSB 

DEC    HL  f RETURN  HL  TO  ORIGINAL  VALUE 

The  register  pair  is  stored  in  memory  in  the  usual  upside-down  fashion. 

7.  Store  alternate  processor  status  (AF')  in  stack. 

EX  AF,AF' 
PUSH  AF 


Move  Instruetions 

1 .  Transfer  accumulator  to  flag  register. 

LD  rpl,A 
PUSH  rp 
POP  AF 

The  flag  register  is  the  less  significant  byte  of  register  pair  AF.  This  sequence  also 
changes  the  accumulator  and  the  less  significant  byte  of  a  register  pair  (i.e.,  C,  E,  or  L). 
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2.  Transfer  flag  register  to  accumulator. 

PUSH  AF 
POP  rp 
Nov  A,rpl 

This  sequence  changes  register  pair  rp. 


3.  Move  register  pair  1  to  register  pair  2. 

LD  rp21,rpll 
LD  rp2h,rplh 

This  sequence  transfers  the  contents  of  register  pair  rpl  to  rp2  without  changing  rpl. 
Remember,  EX  DE,HL  exchanges  register  pairs  DE  and  HL  specifically. 

4.  Move  stack  pointer  to  HL. 

LD  HL,0 
ADD  HL,SP 


5.  Move  stack  pointer  to  an  index  register. 

LD  xy,0 
ADD  >!y,SP 


6.  Move  index  register  to  register  pair. 

PUSH  xy 
POP  rp 


7.  Move  register  pair  to  index  register. 

PUSH  rp 
POP  xy 


8.  Move  index  register  IX  to  index  register  lY. 

PUSH  IX 
POP  lY 


9.  Move  index  register  lY  to  index  register  IX. 

PUSH  lY 
POP  IX 


10.  Move  HL  to  program  counter. 
JP  (HL) 
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11.  Move  index  register  to  program  counter. 

JP  (xy) 

12.  Move  memory  locations  ADDR  and  ADDR+1  (MSB  in  ADDR+1)  to  the 
program  counter  (an  indirect  jump). 

LD      HL, (ADDR) 
JP  (HL) 

13.  Move  multiple  (fill).  Place  the  accumulator  in  successive  memory  locations 
starting  at  the  address  in  register  pair  HL.  The  number  of  bytes  to  be  filled  (one  or 
more)  is  in  register  B. 

FILBYT:       LD       (HL),A  ; FILL  A  MEMORY  LOCATION 

INC    HL  ; POINT  TO  NEXT  LOCATION 

DJNZ  FILBYT  ; COUNT  BYTES 

This  routine  can  initialize  an  array  or  buffer.  If  more  than  256  bytes  are  to  be  filled, 
the  repeated  block  move  instructions  become  handy.  The  approach  is  to  fill  the  first 
byte  from  the  accumulator  and  then  use  a  repeated  block  move  to  fill  the  succeeding 
bytes.  The  destination  pointer  is  always  one  byte  ahead  of  the  source  pointer,  so  the 
data  being  moved  is  always  the  same. 

LD       (HL),A  jFILL  THE  FIRST  BYTE  MANUALLY 

LD      D,H  ;  DESTINATION  POINTER  IS  1  BYTE  UP 
LD  E,L 
INC  DE 

DEC     BC  ! COUNT  DOWN  1  BYTE 

LDIR  ; FILL  THE  REST  AUTOMATICALLY 


Exchange  Instructions 


1 .  Exchange  registers  using  the  accumulator 

LD  A,regl 
LD  regl,reg2 
LD  reg2,A 


2.  Exchange  register  pairs. 

•  DEwithHL 

EX  DE,HL 

•  BCwithHL 

PUSH  BC  jBC  TO  TOP  OF  STACK 

EX      HL, (SP)  ;BC  TO  HL,   HL  TO  TOP  OF  STACK 

POP    BC  5HL  TO  BC 
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EX  HL,(SP)  exchanges  HL  with  the  top  of  the  stack. 

•  general,  rpl  with  rp2 

PUSH  rpl  sPUT  RPl,   RP2  IN  STACK 

PUSH  rp2 

POP    rpl  ; EXCHANGE  BY  POPPING  IN  WRONG  ORDER 

POP  rp2 


3.  Exchange  stack  pointer  with  HL. 

EX       DE,HL  ;HL  TO  DE 

LD      HL,0  fSP  TO  HL 
ADD  HL,SP 

EX       DE,HL  ;SP  TO  DE,   RESTORE  HL 

LD      SP.HL  jHL  TO  SP 

EX       PE,HL  !SP  TO  HL 

This  procedure  can  be  used  to  differentiate  between  the  user  stack  and  the  operating 
system  or  monitor  stack. 

4.  Exchange  index  register  with  register  pair. 

PUSH  xy  ?SAVE  INDEX  REO,   REG  PAIR  IN  STACK 
PUSH  rp 

POP     xy  ; EXCHANGE  BY  POPPING  IN  WRONG  ORDER 
POP  rp 


5.  Exchange  index  registers. 

PUSH  IX  jSAVE  BOTH  INDEX  REGISTERS  IN  STACK 

PUSH  lY 

POP  IX  J  EXCHANGE  BY  POPPING  IN  WRONG  ORDER 

POP  lY 


Clear  Instructions 

1.  Clear  the  accumulator. 
SUB  A 

or 

XOR  A 

or 

LD  A,0 

The  third  alternative  executes  more  slowly  and  occupies  more  memory  than  the 
other  two,  but  does  not  affect  the  flags. 
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2.  Clear  a  register. 

LD  reg,0 

3.  Clear  memory  location  ADDR. 

SUB  A 

LD       (ADDR), A 

or 

LD  HL,ADDR 
LD  (HL),0 

The  second  alternative  executes  more  slowly  than  the  first,  but  does  not  affect  the 
accumulator  or  the  flags.  Of  course,  it  does  use  register  pair  HL. 

4.  Clear  a  register  pair. 

LD  rp,0 

5.  Clear  memory  locations  ADDR  and  ADDR+l. 

LD  HL,0 

LD  (ADDR),HL 

HL  is  faster  to  use  here  than  DE  or  BC. 

6.  Clear  Carry  flag. 

AND  A 

or 

OR  A 

Any  other  logical  instruction  (except  CPL)  will  also  clear  the  Carry,  but  these  two 
are  particularly  useful  because  they  do  not  change  the  accumulator.  Remember, 
ANDing  or  ORing  a  bit  with  itself  does  not  affect  its  value.  To  clear  Carry  without 
affecting  any  other  flags,  use  the  sequence 

SCF  J  FIRST  SET  CARRY  FLAG 

CCF  JTHEN  CLEAR  CARRY  BY  COMPLEMENTING 

7.  Clear  bits  of  accumulator. 

AND    MASK  ? CLEAR  BITS  BY  MASKING 

MASK  has  O's  in  the  bit  positions  to  be  cleared  and  1  's  in  the  positions  that  are  to  be 
left  unchanged.  For  example: 

AND     lOnillOB  !  CLEAR  BITS  0  AND  6 

RES  can  clear  only  one  bit  at  a  time. 
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Set  Instructions 

1.  Set  the  accumulator  to  FFig  (all  I's  in  binary). 

LD  A,OFFH 

or 

SUB  A 

DEC  A 

2.  Set  register  to  FFjg. 

LD  reg,OFFH 

3.  Set  memory  location  ADDR  to  FFig. 

LD  A,OFFH 

LD  (ADDR), A 

or 

LD  HL,ADDR 

LD  (HL),OFFH 

4.  Set  bits  of  accumulator. 

OR      MASK  sSET  BITS  BY  MASKING 

MASK  has  I's  in  the  bit  positions  to  be  set  and  O's  elsewhere.  For  example: 

OR       lOllOOOOB  ;SET  BITS  4,   5,   AND  7 

The  SET  instruction  can  set  only  one  bit  at  a  time. 

BRANCH  (JUMP)  INSTRUCTIONS 

Unconditional  Branch  Instructions 

1.  Jump  indirect. 

•  To  address  in  HL 

JP  (.HL> 

•  To  address  at  the  top  of  the  stack 

RET 

Note  that  RET  is  just  an  ordinary  indirect  jump  that  obtains  its  destination  from  the 
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top  of  the  stack.  RET  can  be  used  for  purposes  other  than  returning  from  a  subroutine. 

•  To  address  in  DE 

EX  DE,HL 
JP  (HL.1 

•  To  address  in  BC 

LD  H,B 
LD  L.C 
JP  (HL.1 

or 

PUSH  BC 
RET 

The  second  ahernative  is  much  slower  than  the  first  (21  cycles  as  compared  to  12 
cycles),  but  does  not  change  HL. 

•  To  address  in  an  index  register 

JP  (xy.! 

•  To  address  in  memory  locations  ADDR  and  ADDR+1 

LD      HL,ADDR  ; FETCH  INDIRECT  ADDRESS 

JP       (HL.>  ;AND  BRANCH  TO  IT 


2.  Jump  indexed,  assuming  that  the  base  of  the  address  table  is  in  register  pair  HL 
and  the  index  is  in  the  accumulator 

ADD     A, A  ; DOUBLE  INDEX  FOR  2-BYTE  ENTRIES 

LD      E, A  ; EXTEND  INDEX  TO  16  BITS 

LD  D,0 

ADD    HL,DE  ? CALCULATE  ADDRESS  OF  ELEMENT 

LD      E,  (HL)  ; FETCH  ELEMENT  FROM  ADDRESS  TABLE 

INC  HL 
LD      D, (HL) 

EX       DE,HL  sAND  JUMP  TO  IT 

JP  (HL) 

We  have  assumed  that  the  address  table  (jump  table)  consists  of  as  many  as  128  2-byte 
entries,  stored  in  the  usual  Z80  format  with  the  less  significant  byte  at  the  lowei 
address.  A  typical  table  would  be 

JTAB:  DW      ROUTO  ; ADDRESS  ENTRY  O 

DW      ROUTl  ; ADDRESS  ENTRY  1 

DW      R0UT2  jf  ADDRESS  ENTRY  2 


3.  Jump  and  link;  that  is,  transfer  control  to  address  DEST,  saving  the  current 
program  counter  in  register  pair  HL. 
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LD      HL,HERE         jLOAD  H  AND  L  WITH  LINK 
HERE:  JP      DEST  ; TRANSFER  CONTROL 

This  procedure  can  provide  a  subroutine  capability  that  does  not  use  the  stack.  The 
subroutine  can  return  control  by  adjusting  the  link  and  executing  JP  (HL).  For 
example,  to  return  control  to  the  instruction  immediately  following  JP  DEST,  the 
subroutine  would  have  to  add  3  to  HL  (since  JP  DEST  occupies  3  bytes).  Of  course, 
the  link  could  also  be  changed  to  HERE+3. 


Conditional  Branch  instructions 


1 .  Branch  if  0. 

•  Branch  if  accumulator  contains  0 

AND     A  ;TEST  ACCUMULATOR 

JR       Z , DEST 


•  Branch  if  a  register  contains  0 

INC    reg  sTEST  REGISTER 

DEC  reg 
JR      Z , DEST 

•  Branch  if  memory  location  ADDR  contains  0 

LD  HL,ADDR         sTEST  MEMORY  LOCATION 

INC  WL) 

DEC  (HL.> 

JR  Z , DEST 


LD  A, (ADDR. ^        ; TEST  MEMORY  LOCATION 

AND  A 

JR  Z , DEST 

•  Branch  if  a  register  pair  contains  0 

LD  A,rph  ;TEST  REGISTER  PAIR 

OR  rpl 

JR  Z , DEST 

•  Branch  if  an  index  register  contains  0 

PUSH  xy  J  MOVE  INDEX  REGISTER  TO  REGISTER  PAIR 

POP  rp 

LD  A,rph  ?TEST  REGISTER  PAIR 

OR  rpl 

JR  Z , DEST 
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•  Branch  if  memory  locations  ADDR  and  ADDR+1  both  contain  0 

LD  HL, (ADDR)  ; TEST  A  16-BIT  NUMBER  IN  MEMORY 

LD  A,H 

OR  L 

JR  Z,DEST 

•  Branch  if  a  bit  of  a  register  is  0 

BIT     N,reg  sTEST  BIT  N  OF  REGISTER 

JR      Z , DEST 

Special  cases  are 

•  Branch  if  bit  7  of  the  accumulator  is  0 

AND     A  jTEST  BIT  7  OF  ACCUMULATOR 

JP  P,DEST 

or 

RLA  jMOVE  BIT  7  TO  CARRY 

JR      NO, DEST 

The  second  alternative  allows  relative  jumps,  but  it  also  changes  the  accumulator. 

•  Branch  if  bit  6  of  the  accumulator  is  0 

ADD    A, A  SSET  SIGN  FROM  BIT  6 

JP      P,DEST  sTHEN  TEST  SIGN  FLAG 

•  Branch  if  bit  0  of  the  accumulator  is  0 

RRA  jMOVE  BIT  0  TO  CARRY 

JR      NCDEST  rAND  TEST  CARRY 

•  Branch  if  a  bit  of  a  memory  location  is  0 

LD  HL,ADDR 

BIT     N, (HL)  ;TEST  BIT  N  OF  MEMORY  LOCATION  ADDR 

JR       Z , DEST 

•  Branch  if  interrupts  are  disabled  (that  is,  if  interrupt  flip-flop  IFF2  is  0) 

LD      A,  I  5  MOVE  IFF2  TO  P/V  FLAG 

JP  PO,DEST 

The  instruction  LD  A, I  and  LD  A,R  both  move  interrupt  enable  flip-flop  IFF2  to 
the  Parity/ Overflow  flag.  This  sequence  can  be  used  to  save  the  current  interrupt 
status  before  executing  a  routine  that  must  run  with  interrupts  disabled.  That  status 
can  then  be  restored  afterward. 

2.  Branch  if  not  0. 

•  Branch  if  accumulator  does  not  contain  0 

AND    A  5  TEST  ACCUMULATOR 

JR  NZ,DEST 
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■  Branch  if  a  register  does  not  contain  0 

INC     reg  ; TEST  REGISTER 

DEC  reg 

JR      NZ , DEST 

■  Branch  if  memory  location  ADDR  does  not  contain  0 

LD  HL,ADDR  ;TEST  MEMORY  LOCATION 

INC  (HL) 

DEC  (HL> 

JR  NZ , DEST 


LD      A, (ADPP)  fTEST  MEMORY  LOCATION 

AND  A 

JR      NZ , DEST 

■  Branch  if  register  pair  doe;-:  not  contain  0 

LD      A.rph  jTEST  REGISTER  PAIR 

OR  rpl 

JR  NZ,DEST 

•  Branch  if  index  register  does  not  contain  0 

PUSH  xy  ;TRANSFER  INDEX  REGISTER  TO  REG  PAIR 

POP  rp 

LD      A,rph  ;TEST  REGISTER  PAIR 

OR  rpl 

JR  NZ,DEST 

•  Branch  if  memory  locations  ADDR  and  ADDR+1  do  not  both  contain  0 

LD  HL,  (ADr;;.)  ;TEST  16-EIT  NUMBER  IN  MEMORY 

LD  A,H 

OR  L 

JR  NZ , DEST 

■  Branch  if  a  bit  of  a  register  is  1 

BIT    N,reg  jTEST  BIT  N  OF  REGISTER 

JR      NZ , DEST 

Special  cases  are 

•  Branch  if  bit  7  of  the  accumulator  is  1 

i^ND     A  jTEST  BIT  7  OF  ACCUMULATOR 

JP  M,DEST 


RLA  ;MOVE  BIT  7  TO  CARRY 

JR  CDEST 

The  second  alternative  allows  relative  jumps,  but  it  also  changes  the  accumulator. 
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•  Branch  if  bit  6  of  the  accumulator  is  1 

ADD    A, A  jSET  SIGN  FROM  DIT  6 

JP      M,DEST  {THEN  TEST  SIGN  FLAG 

•  Branch  if  bit  0  of  the  accumulator  is  1 

RRA  ;MOVE  BIT  0  TO  CARRY 

JR      CDEST  ?THEN  TEST  CARRY 

•  Branch  if  a  bit  of  a  memory  location  is  1 

LD  HL.ADDR 

BIT     N,CHL)  sTEST  BIT  N  OF  MEMORY  LOCATION  ADDR 

JR      NZ , DEST 

•  Branch  if  interrupts  are  enabled  (that  is,  if  interrupt  flip-flop  IFF2  is  1) 

LD      A, I  ;MOVE  IFF2  TO  P/V  FLAG 

JP  PE,DEST 

The  instructions  LD  A,I  and  LD  A,R  both  move  interrupt  enable  flip-flop  IFF2  to 
the  Parity/ Overflow  flag.  This  sequence  can  be  used  to  save  the  current  interrupt 
status  before  executing  a  routine  that  must  run  with  interrupts  disabled.  That  status 
can  be  restored  afterward. 

3.  Branch  if  Equal. 

•  Branch  if  (A)  =  VALUE 

CP      VALUE  {COMPARE  BY  SUBTRACTING 

JR       Z , DEST 

The  following  special  cases  apply  to  any  register  or  to  a  memory  location  addressed 
using  HL  or  through  indexing. 

•  Branch  if  (reg)  =  1 

DEC     reg  ;  CHECK  BY  DECREMENTING 

JR      ZrDEST  J  AND  TESTING  RESULT  FOR  ZERO 

This  procedure  can  be  applied  to  any  primary  register,  to  the  memory  location 
addressed  through  HL,  or  to  memory  locations  addressed  via  indexing. 

•  Branch  if  (reg)  =  FFig 

INC    reg  j CHECK  BY  INCREMENTING 

JR       Z,DEST  J  AND  TESTING  RESULT  FOR  ZERO 

This  procedure  can  be  applied  to  any  primary  register,  to  the  memory  location 
addressed  through  HL,  or  to  memory  locations  addressed  via  indexing. 

•  Branch  if  (A)  =  (reg) 

CP      reg  j COMPARE  BY  SUBTRACTING 

JR  Z,DEST 
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Branch  if  (A)  =  (ADDR) 


LD 
CP 
JR 


HL, ADDR 

(HL) 

Z,DEST 


; COMPARE  BY  SUBTRACTING 


Branch  if(rp)=  VAL16 


LD 
AND 
SBC 
JR 


HL,VAL16 
A 

HL,rp 
Z , DEST 


(CLEAR  CARRY 


Carry  must  be  cleared,  since  the  Z80  lacks  a  16-bit  subtract  instruction  without  Carry. 
Note  that  the  two's  complement  of  VAL16  cannot  be  added  using  ADD  HL,  since  that 
instruction  does  not  affect  the  Zero  flag. 


Branch  if  (HL)  =  (rp) 


AND 
SBC 
JR 


A 

HL,rp 
Z , DEST 


; CLEAR  CARRY 


Note:  Do  not  use  either  of  the  next  two  sequences  to  test  for  stack  overflow  or  under- 
flow, since  intervening  operations  could  change  the  stack  pointer  by  more  than  1 . 

•  Branchif  (SP)=  VAL16 


LD 
AND 
SBC 
JR 


HL, VAL16 
A 

HL,SP 
Z.DEST 


•  Branch  if  (SP)  =  (HL) 


AND 
SBC 
JR 


A 

HL,SP 
Z,DEST 


(CLEAR  CARRY 


[CLEAR  CARRY 


Branch  if  (xy)=  VAL16 

PUSH  xy 

POP  rp 

LD  HL,VAL16 

AND  A 

SBC  HL,SP 

JR  Z , DEST 


SMOVE  INDEX  REGISTER  TO  REGISTER  PAIR 

jTHEN  COMPARE  REGISTER  PAIR,  VAL16 
; CLEAR  CARRY 


ADD  xy  cannot  be  used  to  add  the  two's  complement  of  VAL16,  since  ADD  xy  does 
not  affect  the  Zero  flag. 

4.  Branch  if  Not  Equal. 
•  Branch  if  (A)  7^  VALUE 


CP 
JR 


VALUE 
NZ , DEST 


J  COMPARE  BY  SUBTRACTING 
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The  following  special  cases  apply  to  any  register  or  to  a  memory  location  addressed 
using  HL  or  through  indexing. 


Branch  if  (reg)  7^  1 


DEC 


reg 

NZ.DEST 


Branch  if  (reg)  #  FFig 


INC 
JR 


reg 

NZ , DEST 


Branch  if  (A)  #  (reg) 


CP 
JR 


reg 

NZ , DEST 


Branch  if  (A)#  (ADDR) 


LD 
CP 
JR 


HL,ADDR 
(HL) 

NZ , DEST 


! CHECK  BY  DECREMENTING 

sAND  TESTING  RESULT  FOR  ZERO 


! CHECK  BY  INCREMENTING 

fAND  TESTING  RESULT  FOR  ZERO 


? COMPARE  BY  SUBTRACTING 


J  COMPARE  BY  SUBTRACTING 


Branchif  (rp)#  VALI6 


LD 
AND 

SBC 
JR 


HL,VAL16 
A 

HL,rp 
NZ,DEST 


Branch  if  (HL)  #  (rp) 


AND 

SBC 
JR 


A 

HL,rp 
NZ.DEST 


[CLEAR  CARRY 


; CLEAR  CARRY 


Note:  You  should  not  use  either  of  the  next  two  sequences  to  test  for  stack  overflow 
or  underflow,  since  intervening  operations  could  change  the  stack  pointer  by  more 
than  1. 


Branch  if(SP)7^  VAL16 


LD 

AND 
SBC 
JR 


HL,VAL16 
A 

HL,SP 
NZ , DEST 


Branch  if  (SP)  #  (HL) 


AND 

SBC 
JR 


A 

HL,SP 
NZ,DEST 


Branch  if  (xy)#  VAL16 

PUSH  xy 
POP  rp 


! CLEAR  CARRY 


p CLEAR  CARRY 


?MOVE  INDEX  REGISTER  TO  REGISTER  PAIR 
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LD  HL,VAL16  jTHEN  COMPARE  REGISTER  PAIR  AND  VAL16 

AND  A  !  CLEAR  CARRY 

SEC  HL,rp 

JR  NZ,DEST 


ADD  xy  cannot  be  used  to  add  the  two's  complement  of  VAL16,  since  ADD  xy  does 
not  affect  the  Zero  flag. 


5.  Branch  if  Positive. 

•  Branch  if  contents  of  accumulator  are  positive 

AND     A  J  TEST  ACCUMULATOR 

JP  P,DEST 

•  Branch  if  contents  of  a  register  are  positive 

INC    reg  ; TEST  REGISTER 

DEC  reg 
JP  P,DEST 

•  Branch  if  contents  of  memory  location  ADDR  are  positive 

LD  HL.ADDR  ;TEST  MEMORY  LOCATION 

INC  (HL.) 

DEC  (HL) 

JP  P,DEST 


LD      A, (ADDR)  j TEST  MEMORY  LOCATION 

AND  A 

JP  P,DEST 

•  Branch  if  contents  of  a  register  pair  are  positive 

INC     rph  sTEST  MORE  SIGNIFICANT  BYTE  ONLY 

DEC  rph 
JP  P,DEST 

■  Branch  if  contents  of  index  register  are  positive 

PUSH  xy  ; TRANSFER  INDEX  REGISTER  TO  AF 

POP  AF 

AND    A  ;TEST  MORE  SIGNIFICANT  BYTE  ONLY 

JP  P,DEST 

•  Branch  if  16-bit  number  in  memory  locations  ADDR  and  ADDR+I  (MSB  in 
ADDR+1)  is  positive 

LD      A, t ADDR+1)  jTEST  MORE  SIGNIFICANT  BYTE  ONLY 

AND  A 

JP  P,DEST 
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LD       HL,ADDR+1  jTEST  SIGN  BIT  OF  MSB 

BIT  7,  (HL.> 
JR       Z , OEST 


6.  Branch  if  Negative. 

•  Branch  if  contents  of  accumulator  are  negative 

AND     A  ?TEST  ACCUMULATOR 

JP  M,DEST 

•  Branch  if  contents  of  a  register  are  negative 

INC     reg  r TEST  PRIMARY  REGISTER 

DEC  reg 
JP  M,DEST 

•  Branch  if  contents  of  memory  location  ADDR  are  negative 

LD  HL,ADDR  jTEST  MEMORY  LOCATION 

INC  (HL) 

DEC  tHL) 

JP  M,DEST 


LD      A, C ADDR)  jTEST  MEMORY  LOCATION 

AND  A 

JP  M.DEST 

•  Branch  if  contents  of  a  register  pair  are  negative 

INC     rph  jTEST  MORE  SIGNIFICANT  BYTE  ONLY 

DEC  rph 
JP  M.DEST 

•  Branch  if  contents  of  an  index  register  are  negative 

PUSH  xy  jMOVE  INDEX  REGISTER  TO  AF 

POP  AF 

AND     A  jTEST  MORE  SIGNIFICANT  BYTE  ONLY 

JP  M.DEST 

•  Branch  if  16-bit  number  in  memory  locations  ADDR  and  ADDR+ 1  (MSB  in 
ADDR+1)  is  negative 

LD      A,(ADDR+l.l  ;TEST  MORE  SIGNIFICANT  BYTE  ONLY 

AND  A 

JP  M.DEST 


LD      HL, ADDR+1 
BIT     7, (HL) 
JR  NZ.DEST 


?TEST  SIGN  BIT  OF  MSB 
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7.  Signed  Branches. 

These  sequences  must  allow  for  two's  complement  overflow.  After  a  comparison,  the 
setting  of  the  Parity  /  Overflow  flag  indicates  that  overflow  occurred.  The  branches  are 
JP  PE  (Branch  on  Overflow)  and  JP  PO  (Branch  on  No  Overflow).  The  idea  then  is  to 
force  a  branch  if  the  specified  condition  holds  and  overflow  did  not  occur  (a  true 
positive),  or  if  the  condition  does  not  hold  but  overflow  did  occur  (a  false  negative). 
The  operand  in  the  initial  comparison  (indicated  as  oper)  could  be  a  data  byte,  a 
register,  (HL),  or  an  indexed  address. 

•  Branch  if  accumulator  is  greater  than  other  operand  (signed) 


CHRVS! 
DONE: 


CP 
JP 
JP 
JR 
JR 
JP 
NOP 


oper 

PE.CHRVS 

M,DONE 

NZ,DEST 

DONE 

M,DONE 


PERFORM  COMPARISON 
BRANCH  IF  OVERFLOW  OCCURRED 
NO  OVERFLOW  -  NO  BRANCH  ON  NEGATIVE 
BRANCH  IF  RESULT  NON-ZERO  POSITIVE 

! BRANCH  IF  NEGATIVE  BUT  OVERFLOW 


This  sequence  forces  a  branch  if  the  result  is  greater  than  0  and  overflow  did  not 
occur,  or  if  the  result  is  less  than  0  but  overflow  did  occur. 

■  Branch  if  accumulator  is  greater  than  or  equal  to  other  operand  (signed) 


CHRVS: 
DONE: 


CP 
JP 
JP 
JR 
JP 
NOP 


oper 

PE, CHRVS 
P,DEST 
DONE 
M,DEST 


(PERFORM  COMPARISON 

; BRANCH  IF  OVERFLOW  OCCURRED 

[BRANCH  IF  NO  OVERFLOW,  POSITIVE 

; BRANCH  IF  OVERFLOW,  NEGATIVE 


This  sequence  forces  a  branch  if  the  result  is  greater  than  or  equal  to  0  and  overflow 
did  not  occur,  or  if  the  result  is  less  than  0  but  overflow  did  occur. 
■  Branch  if  accumulator  is  less  than  other  operand  (signed) 


CHRVS: 
DONE: 


CP 
JP 
JP 
JR 
JP 
NOP 


oper 

PE, CHRVS 
M,DEST 
DONE 
P,DEST 


J  PERFORM  COMPARISON 

; BRANCH  IF  OVERFLOW  OCCURRED 

; BRANCH  IF  NO  OVERFLOW,  NEGATIVE 

; BRANCH  IF  OVERFLOW,  POSITIVE 


This  sequence  forces  a  branch  if  the  result  is  less  than  0  and  overflow  did  not  occur, 
or  if  the  result  is  greater  than  or  equal  to  0  and  overflow  did  occur. 

•  Branch  if  accumulator  is  less  than  or  equal  to  other  operand  (signed) 


CHRVS: 


CP 
JP 
JP 
JR 
JR 
JP 


oper 

PE, CHRVS 

M.DEST 

Z,DEST 

DONE 

M,DONE 


PERFORM  COMPARISON 
BRANCH  IF  OVERFLOW  OCCURRED 
BRANCH  IF  NO  OVERFLOW,  NEGATIVE 
BRANCH  IF  NO  OVERFLOW,  ZERO 
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JR      NZ,DEST       J  BRANCH  IF  OVERFLOW,  POSITIVE 
DONE!  NOP 

This  sequence  forces  a  branch  if  the  resuh  is  less  than  or  equal  to  0  and  overflow  did 
not  occur,  or  if  the  result  is  greater  than  0  and  overflow  did  occur. 

8.  Branch  if  Higher  (Unsigned). 

Branch  if  the  operands  being  compared  are  not  equal  and  the  comparison  does  not 
require  a  borrow.  The  special  problem  here  is  avoiding  a  branch  when  the  operands  are 
equal. 

•  Branch  if  (A)  >  VALUE  (unsigned) 

CP      VALUE  ? COMPARE  BY  SUBTRACT IIMG 

JR      CDONE         ;N0  BRANCH  IF  BORROW  NEEDED 
JR      NZ,DEST       ; BRANCH  IF  NO  BORROW,   NOT  EQUAL 
DONE:  NOP 

Comparing  equal  numbers  clears  Carry.  An  alternative  approach  is 

CP      VALUE+1       {COMPARE  BY  SUBTRACTING  VALUE+1 
JR      NCDEST       ;  BRANCH  IF  NO  BORROW  NEEDED 


Branch  if  (A)  >  (reg)  (unsigned) 


CP  reg 
JR  CDONE 
JR      NZ , DEST 


COMPARE  BY  SUBTRACTING 

NO  BRANCH  IF  BORROW  NEEDED 

BRANCH  IF  NO  BORROW,  NOT  EQUAL 


DONE:  NOP 

or 


LD  regl,A         ; FORM  REG  -  A 

LD  A, reg 

CP  regl 

JR  NCDEST       ;  BRANCH  IF  BORROW  NEEDED 


or 


INC     reg  i FORM  A  -  REG  -  1 

CP  reg 

JR      NCDEST       ; BRANCH  IF  NO  BORROW  NEEDED 

In  the  third  alternative,  we  could  replace  INC  reg  with  DEC  A,  thus  changing  the 
accumulator  instead  of  the  register. 

•  Branch  if  (A)  >  (ADDR)  (unsigned) 

LD  HL,ADDR 

CP       (HL.1  ;  COMPARE  BY  SUBTRACTING 

JR      CDONE         J  NO  BRANCH  IF  BORROW  NEEDED 
JR      NZ,DEST       J  BRANCH  IF  NO  BORROW,   NOT  EQUAL 
DONE:  NOP 


or 
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LD       reg,A  sFORM  (ADDR)  -  A 

LD      A, (ADDR) 
CP  reg 

JR      CDEST  !  BRANCH  IF  BORROW  NEEDED 

•  Branch  if  (HL)  >  (rp)  (unsigned) 

SCF  jSET  CARRY  FLAG 

SBC  HL,rp 

JR      NCDEST  ;  BRANCH  IF  NO  BORROW  NEEDED 

•  Branch  if  (HL)  >  VAL16  (unsigned) 

LD      rp,-VAL16-l         ;FORM  HL  -  VAL16  -  1 
ADD  HL,rp 

V.1R      CDEST  ; BRANCH  IF  NO  BORROW  NEEDED 

Carry  is  an  inverted  borrow  here,  since  we  are  subtracting  by  adding  the  two's 
complement. 

•  Branch  if  (SP)  >  (HL)  (unsigned) 

AND     A  ; CLEAR  CARRY  FLAG 

SBC  HLxSP 
JR  CDEST 

■  Branch  if  (SP)  >  VAL16  (unsigned) 

LD      HL,-VAL16-1         ; FORM  SP  -  VAL16  -  1 
ADD  HL,SP 

JR      CDEST  ;  BRANCH  IF  NO  BORROW  GENERATED 

•  Branch  if  (xy)  >  VAL16  (unsigned) 

LD      rp,-VAL16-l         jFORM  XY  -  VAL16  -  1 
ADD  !-!y,rp 

JR      CDEST  ;  BRANCH  IF  NO  BORROW  GENERATED 

•  Branch  if  (xy)  >  (HL)  (unsigned) 

PUSH  xy  ;MOVE  INDEX  REGISTER  TO  REGISTER  PAIR 

POP  rp 

AND     A  ; CLEAR  CARRY  FLAG 

SBC  HL,rp 
JR  CDEST 

9.  Branch  if  Not  Higher  (Unsigned). 

Branch  if  the  operands  being  compared  are  equal  or  the  comparison  requires  a 
borrow.  The  special  problem  here  is  forcing  a  branch  if  the  operands  are  equal. 

•  Branch  if  (A)  <  VALUE  (unsigned) 


CP  VALUE 
JR  CDEST 
JR  Z,DEST 


COMPARE  BY  SUBTRACTING 
BRANCH  IF  BORROW  NEEDED 
OR  IF  EQUAL 


or 
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or 


or 


CP 


VALUE+1 
CDEST 


; COMPARE  BY  SUBTRACTING  VALUE+1 
; BRANCH  IF  BORROW  NEEDED 


Branch  if  (A)  <  (reg)  (unsigned) 


CP 
JR 
JR 


LD 
LD 
CP 
JR 


INC 

CP 

JR 


reg 

C, DEST 
Z , DEST 


regl , A 
A, reg 
regl 
NCrDEST 


reg 
reg 

CDEST 


COMPARE  BY  SUBTRACTING 
BRANCH  IF  BORROW  NEEDED 
OR  IF  EQUAL 


(FORM  REG  -  A 

f BRANCH  IF  NO  BORROW  NEEDED 

I  FORM  A  -  REG  -  1 

I  BRANCH  IF  BORROW  NEEDED 


In  the  third  alternative,  we  could  replace  INC  reg  with  DEC  A,  thus  changing  the 
accumulator  instead  of  the  register. 

•  Branch  if  (A)  <  (ADDR)  (unsigned) 


LD 
CP 
JR 
JR 


HL, ADDR 
(HL) 
CDEST 
Z , DEST 


COMPARE  BY  SUBTRACTING 
BRANCH  IF  BORROW  NEEDED 
OR  IF  EQUAL 


or 


LD 
LD 
CP 
JR 


reg,  A 
(ADDR), A 
reg 

NCDEST 


;FORM  (ADDR) 


f BRANCH  IF  NO  BORROW  NEEDED 


Branch  if  (HL)  <  (rp)  (unsigned) 


SCF 
SBC 
JR 


HL,  rp 
CDEST 


SET  CARRY  FLAG 
FORM  HL  -  RP  -  1 
BRANCH  IF  BORROW  NEEDED 


•  Branch  if  (HL)  <  VAL16  (unsigned) 

LD  rp,-VAL16-l 

ADD     HL,rp  jFORM  HL  -  VAL16  -  1 

NCDEST  J  BRANCH  IF  BORROW  NEEDED 

•  Branch  if  (SP)  <  (HL)  (unsigned) 

AND     A  ;  CLEAR  CARRY 

SBC     HL,SP  jFORM  HL  -  SP 

JR      NCDEST  ;  BRANCH  IF  NO  BORROW  NEEDED 


146    Z80  ASSEMBLY  LANGUAGE  SUBROUTI NES 


•  Branch  if  (SP)  <  VAL16  (unsigned) 

LD      HL,-VftL16-l  sFORM  SP  -  VAL16  -  1 

ADD  HL,SP 

JR      NCDEST  ; BRANCH  IF  BORROW  NEEDED 

•  Branch  if  (xy)  <  VAL16  (unsigned) 

LD      rp,-VAL16-l         ; FORM  XY  -  VAL16  -  1 
AdD  xy,rp 

JR      NCDEST  ;  BRANCH  IF  BORROW  NEEDED 

•  Branch  if  (xy)  <  (HL)  (unsigned) 

PUSH  xy  ;MOVE  INDEX  REGISTER  TO  REGISTER  PAIR 
POP  rp 

AND    A  ; CLEAR  CARRY 

SBC     HL,rp  ;FORM  HL  -  XY 

JR      NCDEST  f BRANCH  IF  NO  BORROW  NEEDED 

10.  Branch  if  Lower  (Unsigned).  Branch  if  the  unsigned  comparison  requires  a 
borrow. 

■  Branch  if  (A)  <  VALUE  (unsigned) 

CP      VALUE  J  COMPARE  BY  SUBTRACTING 

JR      CDEST  {BRANCH  IF  BORROW  NEEDED 

•  Branch  if  (A)  <  (reg)  (unsigned) 

CP      reg  j COMPARE  BY  SUBTRACTING 

JR      CDEST  ; BRANCH  IF  BORROW  NEEDED 

•  Branch  if  (A)  <  (ADDR)  (unsigned) 

LD  HL,ADDR 

CP       (HL)  J  COMPARE  BY  SUBTRACTING 

JR  CDEST 

•  Branch  if  (HL)  <  (rp)  (unsigned) 

AND    A  jFORM  HL  -  RP 

SBC  HL.rp 

JR      CDEST  ? BRANCH  IF  BORROW  NEEDED 

•  Branch  if  (HL)  <  VAL16  (unsigned) 

LD      rp,-VAL16  ?FORM  HL  -  VAL16 

ADD  HL,rp 

JR      NCDEST  f BRANCH  IF  BORROW  NEEDED 

•  Branch  if  (SP)  <  (HL)  (unsigned) 

SCF  sFORM  HL   -  SP-1 

SBC  HL,SP 

JR      NCDEST  !  BRANCH  IF  NO  BORROW  NEEDED 
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Branch  if  (SP)  <  VAL16  (unsigned) 

LD      HL,-VAL16  ;FORM  SP  -  VAL16 

ADD  HL.SP 

JR      NCDEST  ; BRANCH  IF  NO  BORROW  NEEDED 

Branch  if  (xy)  <  VAL16  (unsigned) 

LD      rp,-VAL16  ; FORM  XY  -  VAL16 

ADD  >;y,rp 

JR      NCDEST  ; BRANCH  IF  NO  BORROW  NEEDED 

Branch  if  (xy)  <  (HL)  (unsigned) 

SMOVE  INDEX  REGISTER  TO  REGISTER  PAIR 
(FORM  HL  -  XY-1 
[BRANCH  IF  NO  BORROW  NEEDED 


PUSH  xy 
POP  rp 
SCF 

SBC  HL,rp 
JR  NCDEST 


11.  Branch  if  Not  Lower  (Unsigned).  Branch  if  the  unsigned  comparison  does  not 
require  a  borrow. 

•  Branch  if  (A)  >  VALUE  (unsigned) 

CP      VALUE  ; COMPARE  BY  SUBTRACTING 

JR      NCDEST  !  BRANCH  IF  NO  BORROW  NEEDED 

•  Branch  if  (A)  >  (reg)  (unsigned) 

CP      reg  ; COMPARE  BY  SUBTRACTING 

JR      NCDEST  ;  BRANCH  IF  NO  BORROW  NEEDED 

•  Branch  if  (A)  >  (ADDR)  (unsigned) 

LD  HL,ADDR 

CP       (HL)  ; COMPARE  BY  SUBTRACTING 

JR      NCDEST  ;  BRANCH  IF  NO  BORROW  NEEDED 

•  Branch  if  (HL)  >  (rp)  (unsigned) 

AND    A  ?FORM  HL  -  RP 

SBC  HL.rp 

JR      NCDEST  5 BRANCH  IF  NO  BORROW  NEEDED 

•  Branch  if  (HL)  >  VAL16  (unsigned) 

LD      rp,-VAL16  jFORM  HL  -  VAL16 

ADD  HL,rp 

JR      CDEST  5  BRANCH  IF  NO  BORROW  NEEDED 

■  Branch  if  (SP)  >  (HL)  (unsigned) 

SCF  SFORM  HL   -  SP-1 

SBC  HL,SP 

JR      CDEST  ; BRANCH  IF  BORROW  NEEDED 
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■  Branch  if  (SP)  >  VAL16  (unsigned) 

LD      HL,-VALl(i  ;FORM  SP  - 
ADD  HL,rp 

JR      CDEST         ;  BRANCH  IF  NO  BORROW  NEEDED 

•  Branch  if  (xy)  >  VAL16  (unsigned) 

LD       rp,-VAL16  jFORM  XY  -  VAL16 
ADD  >iy,SP 

JR      CDEST         J  BRANCH  IF  NO  BORROW  NEEDED 

•  Branch  if  (xy)  >  (HL)  (unsigned) 

PUSH  xy  ! TRANSFER  INDEX  REG  TO  REGISTER  PAIR 

POP  rp 

SCF  J  FORM  HL  -  XY  -  1 

SBC    HL, rp 

JR      CDEST         ; BRANCH  IF  BORROW  NEEDED 

SKIP  INSTRUCTIONS 

Skip  instructions  can  be  implemented  on  the  Z80  microprocessor  by  using  jump 
instructions  with  the  proper  destination.  That  destination  should  be  one  instruction 
beyond  the  one  that  follows  the  jump  sequentially.  The  actual  number  of  bytes  skipped 
will  vary,  since  Z80  instructions  vary  from  one  to  four  bytes  in  length. 

SUBROUTINE  CALL  INSTRUCTIONS 
Unconditional  Call  Instructions 

An  indirect  call  on  the  Z80  microprocessor  can  be  implemented  by  calling  a  routine 
that  performs  an  indirect  jump.  An  RET  instruction  at  the  end  of  the  subroutine  will 
then  transfer  control  back  to  the  original  calling  point.  The  main  program  performs 

CALL  TRANS 

where  subroutine  TRANS  transfers  control  to  the  ultimate  destination.  Note  that 
TRANS  ends  with  a  jump,  not  with  a  return.  Typical  TRANS  routines  are 

•  To  address  in  HL 

TRANS!         JP       (HL.)  ; ENTRY  POINT  IN  HL 

•  To  address  in  an  index  register 

TRANS:         JP       (xy.)  j ENTRY  POINT  IN  AN  INDEX  REGISTER 
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To  address  in  DE 


TRANS: 


EX 


•  To  address  in  BC 

TRANS:  LD 
LD 
JP 


DE,HL 
(HL) 


H,B 
L,C 
(HL) 


or 


TRANS: 


PUSH  BC 
RET 


SENTRY  POINT  IN  DE 


; ENTRY  POINT  IN  BC 


; ENTRY  POINT  IN  BC 


The  second  alternative  is  longer,  but  leaves  HL  unchanged. 
■  To  address  in  memory  locations  ADDR  and  ADDR+1 
TRANS: 


LD 
JP 


HL, (ADDR)  SENTRY  POINT  AT  ADDR 
(HL.) 


•  To  address  at  the  top  of  the  stack.  Here  we  must  exchange  the  return  address 
with  the  top  of  the  stack.  This  can  be  done  in  the  main  program  as  follows: 


LD 
EX 
JP 


HL,RETPT 
HL,  (SP.) 
(HL) 


GET  RETURN  POINT  ADDRESS 
PUT  RETURN  ADDRESS  ON  STACK 
AND  JUMP  TO  OLD  TOP  OF  STACK 


The  exchange  can  allow  later  resumption  of  a  suspended  program  or  provide  a 
special  exit  to  an  error-handling  routine. 

You  can  implement  indexed  calls  in  the  same  way  as  indirect  calls.  The  CALL 
instruction  transfers  control  to  a  routine  that  performs  an  indexed  jump  as  shown 
earlier.  That  routine  ends  with  an  ordinary  jump  instruction  (typically  JP  (HL))  that 
does  not  affect  the  stack.  An  RET  instruction  at  the  end  of  the  actual  subroutine  will 
therefore  transfer  control  back  to  the  original  calling  point. 

If  the  main  program  executes  CALL  JMPIND  with  the  index  in  the  accumulator 
and  the  starting  address  of  the  jump  table  in  register  pair  HL,  the  indexed  jump  routine 
is 

JMPINDs 


ADD 

A, A 

5 DOUBLE  INDEX  FOR  2-BYTE  ENTRIES 

LD 

E,  A 

5 EXTEND  INDEX  TO  16  BITS 

LD 

D,0 

ADD 

HL,DE 

S CALCULATE  ADDRESS  OF  ELEMENT 

LD 

E, (HL) 

5  FETCH  ELEMENT  FROM  ADDRESS  TABLE 

INC 

HL 

LD 

D, (HL) 

EX 

DE,HL 

5 AND  JUMP  TO  IT 

JP 

(HL) 

One  problem  with  indexed  and  indirect  calls  is  that  the  transfer  routines  may 
interfere  with  the  subroutines.  For  example,  the  indexed  jump  routine  JMPIND 
changes  the  accumulator,  register  pair  DE,  register  pair  HL,  and  the  flags.  Thus,  none 
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of  these  registers  can  be  used  to  pass  parameters  to  the  subroutine.  The  programmer 
must  always  remember  that  the  intermediate  transfer  routines  are  interposed  between 
the  main  program  and  the  actual  subroutine.  A  similar  interposition  occurs  when 
operating  system  routines  transfer  control  from  one  task  to  another  or  from  a  main 
program  to  an  I/O  driver  or  an  interrupt  service  routine. 


Conditional  Caii  Instructions 

Conditional  calls  can  be  implemented  on  the  Z80  by  using  the  sequences  shown  for 
conditional  branches.  The  only  change  is  that  jumps  to  the  actual  destination  must  be 
replaced  with  calls  (for  example,  replace  JR  NZ,DEST  with  CALL  NZ,DEST  or  JP 
P,DEST  with  CALL  P.DEST). 


The  RET  instruction  returns  control  automatically  to  the  address  saved  at  the  top  of 
the  stack.  If  the  return  address  is  saved  elsewhere  (for  example,  in  a  register  pair  or  in 
two  fixed  memory  locations)  you  can  transfer  control  to  it  by  performing  an  indirect 
jump. 


Conditional  returns  can  be  implemented  on  the  Z80  microprocessor  by  using  the 
sequences  shown  earlier  for  conditional  branches.  The  only  change  is  that  you  must 
replace  jumps  to  the  actual  destination  with  RETs  (for  example,  replace  JR  NC,  DEST 
with  RET  NC  or  JP  M,DEST  with  RET  M). 


•  Return  control  to  the  address  at  the  top  of  the  stack  after  it  has  been 
incremented  by  an  offset  NEXT.  This  sequence  lets  you  transfer  control  past 
parameters,  data,  and  other  non-executable  items. 


SUBROUTINE  RETURN  INSTRUCTIONS 


Unconditional  Return  Instructions 


Conditional  Return  Instructions 


Return  witti  SIcip  Instructions 


POP  DE 

LD  HL,NEXT 

ADD  HL,DE 

JP  (HL) 


;GET  RETURN  ADDRESS 

; OFFSET  TO  NEXT  EXECUTABLE  INSTRUCTION 


J  AND  RETURN 
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■  Change  the  return  address  to  RETPT.  Assume  that  the  return  address  is 
currently  stored  at  the  top  of  the  stack. 

LD      HL, RETPT  j CHANGE  RETURN  ADDRESS  TO  RETPT 

EX       HL, (SP) 

EX  HL,(SP)  exchanges  HL  with  the  top  of  the  stack.  This  procedure  allows  you  to 
force  a  special  exit  to  an  error  routine  or  other  exception-handling  program  without 
changing  the  logic  of  the  subroutine  or  losing  track  of  the  original  return  address. 


Return  from  Interrupt  Instructions 


If  the  initial  portion  of  the  interrupt  service  routine  saves  all  the  primary  registers 
and  the  index  registers  with  the  sequence 

PUSH  AF  ;SAVE  PRIMARY  REGISTERS 

PUSH  EC 
PUSH  DE 
PUSH  HL 

PUSH  IX  jSAVE  INDEX  REGISTERS 

PUSH  lY 

a  standard  return  sequence  is 

POP     lY  ; RESTORE  INDEX  REGISTERS 

POP  IX 

POP     HL  ; RESTORE  PRIMARY  REGISTERS 

POP  DE 
POP  BC 
POP  AF 

EI  jREENABLE  INTERRUPTS 

RET  I 

The  order  of  restoration  is  the  opposite  of  the  order  in  which  the  registers  were 
saved.  The  instruction  EI  must  come  immediately  before  RETI  to  avoid  unnecessary 
stacking  of  return  addresses. 


MISCELLANEOUS  INSTRUCTIONS 


In  this  category,  we  include  no  operations,  push,  pop,  halt,  wait,  trap  (break  or 
software  interrupt),  decimal  adjust,  enabling  and  disabling  of  interrupts,  translation 
(table  lookup),  and  other  instructions  that  do  not  fall  into  any  of  the  earlier  categories. 


1 .  No  Operation  Instructions. 

Like  NOP  itself,  any  LD  instruction  with  the  same  source  and  destination  register 
does  nothing  except  advance  the  program  counter.  These  additional  no-ops  are 
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LD  A,  A 

LD  B,B 

LD  C,C 

LD  0,0 

LD  E,E 

LD  H,H 

LD  L,L 


2.  Push  Instructions. 

•  Push  a  single  register  (A,  B,  D,  or  H) 

PUSH  rp  jPUSH  THE  REGISTER  PAIR 

INC     SP  ;BUT  DROP  THE  LESS  SIGNIFICANT  HALF 

The  register  pair  could  be  AF.  Programmers  generally  prefer  to  combine  byte-length 
operands  or  simply  waste  a  byte  of  the  stack  rather  than  attempt  to  push  a  single  byte. 

•  Push  memory  location  ADDR 

LD      A,  (ADDR.)  ;  OBTAIN.  DATA  FROM  MEMORY 

PUSH  AF  fPUSH  DATA,  FLAGS 

INC     SP  ?THEN  DROP  THE  FLAGS 

ADDR  could  be  an  external  priority  or  control  register  (or  a  copy  of  an  external 
register). 

■  Push  memory  locations  ADDR  and  ADDR+1 

LD      HL,  (ADDR.)  ;PUSH  A  PAIR  OF  MEMORY  LOCATIONS 

PUSH  HL 

•  Push  the  interrupt  flip-flop  IFF2 

LD      A, I  ;MOVE  IFF2  TO  PARITY/OVERFLOW  FLAG 

PUSH  AF 

This  sequence  allows  you  to  save  the  interrupt  status  in  the  Parity  /  Overflow  flag  (bit 
2  of  register  F)  for  later  restoration. 


3.  Pop  (Pull)  Instructions. 

•  Pop  a  single  register  (A,  B,  D,  or  H),  assuming  that  it  has  been  saved  as  shown 
previously 

DEC     SP  jBACK  UP  THE  STACK  POINTER 

POP     rp  ;POP  THE  REGISTER  PAIR 

This  sequence  changes  the  less  significant  half  of  the  register  pair  unpredictably. 

■  Pop  memory  location  ADDR,  assuming  that  it  has  been  saved  at  the  top  of  the 
stack 

DEC    SP  ;BACK  UP  THE  STACK  POINTER 

POP     AF  ;POP  ACCUMULATOR  AND  FLAGS 

LD       (ADDR.),  A  ;  RESTORE  DATA  TO  MEMORY 
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This  sequence  changes  the  flags  unpredictably.  ADDR  could  be  an  external  priority 
or  control  register  (or  a  copy  of  an  external  register). 

•  Pop  memory  locations  ADDR  and  ADDR+ 1 ,  assuming  that  they  were  saved  as 
shown  previously 

POP     HL  ; RESTORE  A  PAIR  OF  MEMORY  LOCATIONS 

LD  (ADDR),HL 

Sometimes  you  must  push  and  pop  key  memory  locations  and  other  values  beside  the 
registers. 

■  Restore  interrupt  status,  assuming  that  it  has  been  saved  at  the  top  of  the  stack. 

POP     AF  ; OBTAIN  PREVIOUS  INTERRUPT  STATUS 

JP       PE, ENABLE 

DI  ; DISABLE  INTERRUPTS  IF  PREVIOUSLY  SO 

JR  DONE 

ENABLE;       EI  p ENABLE  INTERRUPTS  IF  PREVIOUSLY  SO 

DONE:  NOP 

The  interrupt  flip-flop  IFF2  is  saved  in  the  Parity/ Overflow  flag;  interrupts  were 
previously  enabled  if  that  flag  is  1  and  disabled  if  it  is  0. 


Wait  Instructions 

The  simplest  way  to  implement  a  wait  on  the  Z80  microprocessor  is  to  use  an  endless 
loop  such  as 

HERE:  JP  HERE 

The  processor  will  execute  JP  until  it  is  interrupted  and  will  resume  executing  it  after 
the  interrupt  service  routine  returns  control.  Of  course,  regular  interrupts  must  have 
been  enabled  (with  EI)  or  the  processor  will  execute  the  endless  loop  indefinitely.  The 
non-maskable  interrupt  can  interrupt  at  any  time  without  being  enabled. 


Trap  instructions 

The  common  Z80  traps  (also  called  breaks  or  software  interrupts)  are  the  RST 
instructions  (seethe  list  in  Table  1-9).  RST  n  calls  the  subroutine  starting  at  address  n. 
Thus,  for  example,  RST  0  transfers  control  to  memory  address  0000  after  saving  the 
current  program  counter  in  the  stack.  Similarly,  RST  30H  transfers  control  to  memory 
address  OOSOig  after  saving  the  current  program  counter  in  the  stack.  The  interrupt 
system  generally  uses  the  RST  instructions,  but  the  programmer  can  dedicate  unused 
ones  to  common  subroutines,  error  traps,  or  supervisor  entry  points.  RST  then  serves 
as  a  1-byte  call. 
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Adjust  Instructions 

1.  Branch  if  accumulator  does  not  contain  a  valid  decimal  (BCD)  number. 

LD  reg,A  ; SAVE  COPY  OF  ACCUMULATOR 

ADD  A,0  jTHEN  DECIMAL  ADJUST  ACCUMULATOR 

DAA 

CMP  reg  ;DID  DECIMAL  ADJUST  CHANGE  A? 

JR  NZrDEST  5 YES,   A  WAS  NOT  DECIMAL 

2.  Decimal  increment  accumulator  (add  1  to  A  in  decimal). 

ADD     A, 1  ;ADD  1  IN  DECIMAL 

DAA 

3.  Decimal  decrement  accumulator  (subtract  1  from  A  in  decimal). 

SUE     1  ; SUBTRACT  1   IN  DECIMAL 

DAA 

or 

ADD     A,99H  ; SUBTRACT  1  BY  ADDING  99 

DAA 

The  second  alternative  is  compatible  with  the  8080  and  8085  processors,  where  DAA 
works  properly  only  after  addition  instructions. 


Enable  and  Disable  Interrupt  Instructions 

1 .  Enable  interrupts  but  save  previous  value  of  interrupt  flip-flop  2  (the  interrupt 
status). 

LD      A,  I  sMOVE  INTERRUPT  FLIP-FLOP  TO  P/V  FLAG 

PUSH  AF  J  SAVE  OLD  IFF2  IN  STACK 

EI  J  THEN  ENABLE  INTERRUPTS 


2.  Disable  interrupts  but  save  previous  value  of  interrupt  flip-flop  2  (the  interrupt 
status). 

LD      A, I  ;MOVE  INTERRUPT  FLIP-FLOP  TO  P/V  FLAG 

PUSH  AF  ;SAVE  OLD  IFF2  IN  STACK 

DI  ;THEN  DISABLE  INTERRUPTS 

3.  Restore  interrupt  status,  assuming  that  it  is  currently  saved  in  the  Parity/ 
Overflow  flag  at  the  top  of  the  stack. 


POP  AF 

JP      PE, ENABLE 


! OBTAIN  PREVIOUS  INTERRUPT  STATUS 
;WERE  INTERRUPTS  ENABLED  ORIGINALLY? 
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DI  ;N0,   THEN  DISABLE  THEM  NOW 

JR  DONE 

ENABLE:       EI  jYES,   THEN  ENABLE  THEM  NOW 

DONE:  NOP 

After  LD  A,I  or  LD  A,R,  JP  PE  means  "branch  if  interrupts  are  enabled,"  while  JP 
PO  means  "branch  if  interrupts  are  disabled." 

Translate  Instructions 

1.  Translate  the  accumulator  into  the  corresponding  entry  in  a  table  starting  at  the 
address  in  register  pair  HL. 

LD  E,A  ; EXTEND  OPERAND  TO  16-BIT  INDEX 

LD  D,  0 

ADD  HL,DE  ; USE  OPERAND  TO  ACCESS  TABLE 

LD  A, (HL)  ; REPLACE  OPERAND  WITH  TABLE  ENTRY 

This  procedure  can  be  used  to  convert  data  from  one  code  to  another. 

2.  Translate  the  accumulator  into  the  corresponding  16-bit  entry  in  a  table  starting 
at  the  address  in  register  pair  HL.  Place  the  entry  in  HL. 


EX 

DE,HL 

JMOVE  STARTING  ADDRESS  TO  DE 

LD 

L,A 

; EXTEND  OPERAND  TO  16-BIT  INDEX 

LD 

H,0 

ADD 

HL,HL 

; DOUBLE  INDEX  FOR  2-BYTE  ENTRIES 

ADD 

HL,DE 

{CALCULATE  INDEXED  ADDRESS 

LD 

E, <HL) 

! OBTAIN  ENTRY 

INC 

HL 

LD 

D,  (HL.) 

EX 

DE.HL 

SMOVE  ENTRY  TO  HL 

Using  ADD  HL,HL  to  double  the  operand  allows  it  to  take  on  any  8-bit  value  (using 
ADD  A,A  would  limit  us  to  values  below  128). 

Miscellaneous  instructions 

1 .  Allocate  space  on  the  stack;  decrease  the  stack  pointer  to  provide  NUM  empty 
locations  at  the  top. 

LD      HL,-NUM       ;ADD  NUM  EMPTY  BYTES  TO  TOP  OF  STACK 
ADD  HL,SP 

LD      SP.HL  ;SP  =  SP  -  NUM 

An  alternative  is  a  series  of  DEC  SP  instructions. 

2.  Deallocate  space  from  the  stack;  increase  the  stack  pointer  to  remove  NUM 
temporary  locations  from  the  top. 
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LD      HL,NUM  J  DELETE  NUM  BYTES  FROM  STACK 

ADD  HL,SP 

LD      SP.HL  ;SP  =  SP  +  NUM 

An  alternative  is  a  series  of  INC  SP  instructions. 


ADDITIONAL  ADDRESSING  MODES 

•  Indirect  Addressing.  Indirect  addressing  can  be  provided  on  the  Z80  processor  by 
loading  the  indirect  address  into  register  pair  HL.  Then  addressing  through  HL 
provides  the  equivalent  of  true  indirect  addressing.  This  is  a  two-step  process  that 
generally  requires  HL,  aUhough  BC  or  DE  can  be  employed  to  load  and  store  the 
accumulator.  The  index  registers  may  also  be  used,  although  at  the  cost  of  extra 
execution  time  and  memory.  Note  that  indexed  addressing  with  a  0  offset  is  simply  a 
slow  version  of  indirect  addressing. 


Examples 

1 .  Load  the  accumulator  indirectly  from  the  address  in  memory  locations  ADDR 
and  ADDR+1. 


LD 
LD 


HL,  (ADDR.> 
A, (HL) 


; FETCH  INDIRECT  ADDRESS 
; FETCH  DATA  INDIRECTLY 


or 


LD      sy,(ADDR.)  jFETCH  INDIRECT  ADDRESS 

LD      A,(>!y+0>  ;  FETCH  DATA  INDIRECTLY 


2.  Store  the  accumulator  indirectly  at  the  address  in  memory  locations  ADDR  and 
ADDR+1. 

LD      HL,(ADDR)  jFETCH  INDIRECT  ADDRESS 

LD       (HL),A  ; STORE  DATA  INDIRECTLY 


or 


LD       xy,CADDR)  ; FETCH  INDIRECT  ADDRESS 

LD       (xy+0.),A  ;  STORE  DATA  INDIRECTLY 


3.  Load  the  accumulator  indirectly  from  the  address  in  register  pair  HL  (that  is, 
from  the  address  stored  starting  at  the  address  in  HL). 

LD  E,(HL)  ; FETCH  INDIRECT  ADDRESS 

INC  HL 

LD  D,  (HL.) 

LD  A,  (DE.)  jFETCH  DATA  INDIRECTLY 
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4.  Load  the  accumulator  indirectly  from  the  address  in  an  index  register  (that  is, 
from  the  address  stored  starting  at  the  address  in  an  index  register). 

LD      L,(xy+0.')  fFETCH  INDIRECT  ADDRESS 

LD  H,(>!y+1) 

LD      A,(HL)  ; FETCH  DATA  INDIRECTLY 

5.  Store  the  accumulator  indirectly  at  the  address  in  register  pair  HL  (that  is,  at  the 
address  stored  starting  at  the  address  in  HL). 

LD  E,(HL)  ; FETCH  INDIRECT  ADDRESS 

INC  HL 

LD  D,  tHL.1 

LD  (DE.i,A  ;  STORE  DATA  INDIRECTLY 

6.  Store  the  accumulator  indirectly  at  the  address  in  an  index  register  (that  is,  at  the 
address  stored  starting  at  the  address  in  an  index  register). 

LD      L,(xy+0.)  ?FETCH  INDIRECT  ADDRESS 

LD  H,(>!y+1) 

LD       <HL.1,A  ;  STORE  DATA  INDIRECTLY 

7.  Jump  indirectly  to  the  address  in  memory  locations  ADDR  and  ADDR+1. 

LD  HL,  (ADDR.)  ;  FETCH  INDIRECT  ADDRESS 

JP  (HL)  J  AND  TRANSFER  CONTROL  TO  IT 

or 

LD  xy,(ADDR.)  jFETCH  INDIRECT  ADDRESS 

JP  (Ky.)  ;AND  TRANSFER  CONTROL  TO  IT 

Indirection  can  be  repeated  indefinitely  to  provide  multi-level  indirect  addressing.  For 
example,  the  following  routine  uses  the  indirect  address  indirectly  to  load  the 
accumulator: 

LD      E,  (HL.)  sFETCH  FIRST  INDIRECT  ADDRESS 

INC  HL 

LD      D,  (HL.) 

EX  DE,HL 

LD      E, (HL)  ;USE  INDIRECT  ADDRESS  INDIRECTLY 

INC  HL 

LD      D,  (HL.) 

LD      A,(DE)  ! FETCH  DATA  INDIRECTLY 

Indirect  addresses  should  be  stored  in  memory  in  the  usual  Z80  format— that  is,  with 
the  less  significant  byte  first  (at  the  lower  address). 

•  Indexed  Addressing.  Indexed  addressing  can  be  provided  by  using  ADD  HL  to 
add  the  base  and  the  index.  Obviously,  the  exphcit  addition  requires  extra  execution 
time.  The  index  registers  are  useful  when  the  index  is  fixed  (as  in  a  data  structure)  or 
when  HL  is  already  occupied. 
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Examples 

1 .  Load  the  accumulator  from  an  indexed  address  obtained  by  adding  the  accumu- 
lator to  a  fixed  base  address. 

LD  DE.BASE  ;DET  BASE  ADDRESS 

LD  L,A  ; EXTEND  INDEX  TO  16  BITS 

LD  H,  0 

ADD  HL,DE  ; CALCULATE  INDEXED  ADDRESS 

LD  A,(HL)  jFETCH  DATA  FROM  INDEXED  ADDRESS 

2.  Load  the  accumulator  from  an  indexed  address  obtained  by  adding  the  accumu- 
lator to  memory  locations  BASE  and  BASE+L 

LD  HL,(BASE)  sCET  EASE  ADDRESS 

LD  E,A  [EXTEND  INDEX  TO  16  BITS 

LD  D,0 

ADD  HL,DE  [CALCULATE  INDEXED  ADDRESS 

LD  A, (HL)  [FETCH  DATA  FROM  INDEXED  ADDRESS 

3.  Load  the  accumulator  from  an  indexed  address  obtained  by  adding  memory 
locations  INDEX  and  INDEX-M  to  register  pair  HL. 

LD      DE, (INDEX)  [GET  INDEX  FROM  MEMORY 

ADD    HL,DE  [CALCULATE  INDEXED  ADDRESS 

LD      A, (HL)  [FETCH  DATA  FROM  INDEXED  ADDRESS 

4.  Jump  indexed  to  a  jump  instruction  in  a  list.  The  index  is  in  the  accumulator  and 
the  base  address  of  the  list  is  in  register  pair  HL. 

LD  B,A  [MULTIPLY  INDEX  TIMES  3 

ADD  A, A 

ADD  B,A 

LD  C,A  [EXTEND  INDEX  TO  16  BITS 

LD  E,0 

ADD  HL,BC  [CALCULATE  INDEXED  ADDRESS 

JP  (HL)  [AND  TRANSFER  CONTROL  THERE 

The  following  is  a  typical  list  starting  at  address  BASE: 

EASE!  JP      SUBO  [JUMP  TO  SUBROUTINE  0 

JP      SUBl  [JUMP  TO  SUBROUTINE  1 

JP      SUB2  [JUMP  TO  SUBROUTINE  2 

Since  each  JP  instruction  occupies  three  bytes,  we  must  multiply  the  index  by  3  before 
adding  it  to  the  base  address.  If  the  list  is  more  than  256  bytes  long,  we  can  use  the 
following  procedure  to  multiply  the  index  by  3: 

EX  DE,HL  [SAVE  BASE  ADDRESS  IN  DE 

LD  L,A  [EXTEND  INDEX  TO  16  BITS 

LD  H,0 

LD  B,L  [COPY  INDEX   INTO  EC 
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LD  C,H 

ADD  HL,HL  ; DOUBLE  INDEX 

ADD  HL,BC  ; TRIPLE  INDEX 

ADD  HL,DE  ; CALCULATE  INDEXED  ADDRESS 

JP  (HL)  ;AND  TRANSFER  CONTROL  THERE 

•  Autopreincrementing.  In  autopreincrementing,  the  address  register  is  incre- 
mented automatically  before  it  is  used.  Autopreincrementing  can  be  provided  on  the 
Z80  by  incrementing  a  register  pair  before  using  it  as  an  address. 

Examples 

•  Load  the  accumulator  using  autopreincrementing  on  register  pair  HL. 

INC     HL  jAUTOPRE INCREMENT  HL 

LD       A, (HL)  J  FETCH  DATA 

•  Store  the  accumulator  using  autopreincrementing  on  register  pair  DE. 

INC     DE  jAUTOPRE INCREMENT  DE 

LD       (DE),A  ; STORE  DATA 

■  Load  register  pair  DE  starting  at  the  address  two  larger  than  the  contents  of  HL. 

INC  HL  jAUTOPRE INCREMENT  HL  BY  2 

INC  HL 

LD  E, (HL)  ! FETCH  LSB 

INC  HL 

LD  D, (HL)  ; FETCH  MSB 

Autoincrementing  by  2  is  essential  in  handling  arrays  of  addresses  or  16-bit  data 
items. 

•  Store  the  accumulator  using  autopreincrementing  on  memory  locations  ADDR 
and  ADDR+l. 

LD      HL,(ADDR)  fAUTOPRE INCREMENT  INDIRECT  ADDRESS 

INC  HL 

LD       (HL),A  ; STORE  DATA 

LD       (ADDR),HL  jUPDATE  INDIRECT  ADDRESS 

Autopreincrementing  can  be  combined  with  indirection.  Here  memory  locations 
ADDR  and  ADDR-P 1  could  point  to  the  last  occupied  location  in  a  buffer. 

•  Transfer  control  to  the  address  stored  starting  at  an  address  two  larger  than  the 
contents  of  memory  locations  NXTPGM  and  NXTPGM-I- 1 . 

LD  HL, (NXTPGM)  sGET  POINTER 

INC  HL  jAUTOPRE INCREMENT  POINTER 

INC  HL 

LD  (NXTPGM), HL  ; UPDATE  POINTER 

LD  E,(HL)  ! FETCH  STARTING  ADDRESS 

INC  HL 
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LD      D, (HL) 

EX       DE,HL  sAND  TRANSFER  CONTROL  TO  IT 

JP  (HL) 

Here  NXTPGM  and  NXTPGM+ 1  point  to  the  starting  address  of  the  routine  that 
the  processor  has  just  executed.  Initially,  NXTPGM  and  NXTPGM+ 1  would  contain 
BASE-2,  where  BASE  is  the  starting  address  of  a  table  of  routines.  A  typical  table 
would  be 

BASE:  DW      ROUTO  ; STARTING  ADDRESS  FOR  ROUTINE  0 

DW      ROUTl  ; STARTING  ADDRESS  FOR  ROUTINE  1 

DW      R0UT2  ; STARTING  ADDRESS  FOR  ROUTINE  2 

DW      ROUTS  ; STARTING  ADDRESS  FOR  ROUTINE  3 

■  Autopostincrementing.  In  autopostincrementing,  the  address  register  is  incre- 
mented after  it  is  used.  Autopostincrementing  can  be  provided  on  the  Z80  by 
incrementing  a  register  pair  after  using  it  as  an  address.  Note  that  the  Z80  autopostin- 
crements  the  stack  pointer  when  it  executes  POP  and  RET. 


Examples 

■  Load  the  accumulator  using  autopostincrementing  on  register  pair  HL. 

LD      A, (HL)  jFETCH  DATA 

INC     HL  jAUTOPOST INCREMENT  HL 

•  Store  the  accumulator  using  autopostincrementing  on  register  pair  DE. 

LD       (DE.>,A  ;  STORE  DATA 

INC     DE  jAUTOPOST INCREMENT  DE 

•  Load  register  pair  DE  starting  at  the  address  in  HL.  Then  increment  HL  by  2. 

LD      E,  (HL.)  ; FETCH  LSB 

INC  HL 

LD      D,  (HL.)  ;  FETCH  MSB 

INC  HL 

Autoincrementing  by  2  is  essential  in  handling  arrays  of  addresses  or  16-bit  data 
items.  Note  that  postincrementing  is  generally  simpler  and  more  natural  than 
preincrementing. 

•  Store  the  accumulator  using  autopostincrementing  on  memory  locations  ADDR 
and  ADDR+1. 

LD      HL, (ADDR)         jFETCH  INDIRECT  ADDRESS 
LD       (HL),A  ; STORE  DATA 

INC    HL  J AUTOPOST INCREMENT  INDIRECT  ADDRESS 

LD  (ADDR),HL 

•  Autopostincrementing  can  be  combined  with  indirection.  Here  memory  locations 
ADDR  and  ADDR-I- 1  could  point  to  the  next  empty  location  in  a  buffer. 
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•  Transfer  control  to  the  address  stored  at  the  address  in  memory  locations 
NXTPGM  and  NXTPGM+1.  Then  increment  those  locations  by  2. 


LD 
LD 


LD 
EX 
JP 


HL, (NXTPGM) 
E, (HL) 
INC  HL 
LD      D, (HL) 
INC  HL 

(NXTPC5M),HL 
DE,HL 
(HL) 


; FETCH  STARTING  ADDRESS 

f COMPLETE  AUTOPOST INCREMENT 

; TRANSFER  CONTtoL  TO  START  ADDRESS 


Here  NXTPGM  and  NXTPGM+ 1  point  to  the  starting  address  of  the  next  routine 
the  processor  is  to  execute.  Initially,  NXTPGM  and  NXTPGM+1  would  contain 
BASE,  the  starting  address  of  a  table  of  routines.  A  typical  table  would  be 


BASE! 


DW  ROUTO 

DW  ROUTl 

DW  R0UT2 

DW  ROUTS 


STARTING  ADDRESS  FOR  ROUTINE  0 


STARTING  ADDRESS 
STARTING  ADDRESS 
STARTING  ADDRESS 


FOR  ROUTINE  1 

FOR  ROUTINE  2 
FOR  ROUTINE  3 


■  Autopredecrementing.  In  autopredecrementing,  the  address  register  is  decre- 
mented automatically  before  it  is  used.  Autopredecrementing  can  be  provided  on  the 
Z80  processor  by  decrementing  a  register  pair  before  using  it  as  an  address.  Note  that 
the  processor  autopredecrements  the  stack  pointer  when  it  executes  PUSH  and 
CALL. 


Examples 

•  Load  the  accumulator  using  autopredecrementing  on  register  pair  HL. 

DEC     HL  ! AUTOPREDECREMENT  HL 

LD      A, (HL)  ? FETCH  DATA 

■  Store  the  accumulator  using  autopredecrementing  on  register  pair  DE. 

DEC     DE  ; AUTOPREDECREMENT  DE 

LD       (DE),A  ; STORE  DATA 

•  Load  register  pair  DE  starting  at  the  address  two  smaller  than  the  contents  of  HL. 

DEC     HL  ; FETCH  MSB 

LD      D, (HL) 

DEC     HL  ; FETCH  LSB 

LD      E, (HL) 

Autodecrementing  by  2  is  essential  in  handling  arrays  of  addresses  or  16-bit  data 
items.  Note  that  predecrementing  is  generally  simpler  and  more  natural  than 
postdecrementing. 

•  Store  the  accumulator  using  autopredecrementing  on  memory  locations  ADDR 
and  ADDR+1. 
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LD  HL, (ADDR)  j AUTOPRE INCREMENT  INDIRECT  ADDRESS 

DEC  HL 

LD  (HL),A  ; STORE  DATA 

LD  (ADDR),HL  ; UPDATE  INDIRECT  ADDRESS 

Autodecrementing  can  be  combined  with  indirection.  Here  memory  locations  ADDR 
and  ADDR+ 1  could  point  to  the  last  occupied  location  in  a  stack. 

•  Transfer  control  to  the  address  stored  at  an  address  two  smaller  than  the  contents 
of  memory  locations  NXTPGM  and  NXTPGM+1. 

LD      HL, (NXTPGM)         jFETCH  STARTING  ADDRESS 

DEC  HL 

LD      D, (HL) 

DEC  HL 

LD  E,(HL.l 

LD       (NXTPGM.i,HL         ;  STORE  AUTOPREDECREMENTED  POINTER 
EX      DE,HL  ; TRANSFER  CONTROL  TO  START  ADDRESS 

JP  (HL,> 

Here  NXTPGM  and  NXTPGM+1  point  to  the  starting  address  of  the  most  recently 
executed  routine  in  a  list.  Initially,  NXTPGM  and  NXTPGM+1  would  contain 
FINAL+2,  where  FINAL  is  the  address  of  the  last  entry  in  a  table  of  routines.  A 
typical  table  would  be 

DW      ROUTO  5 START I NO  ADDRESS  FOR  ROUTINE  0 

DW      ROUTl  ; STARTING  ADDRESS  FOR  ROUTINE  1 

FINAL!         DW      ROUTL  {STARTING  ADDRESS  FOR  LAST  ROUTINE 

Here  we  work  through  the  table  backward.  This  approach  is  useful  in  evaluating 
mathematical  formulas  entered  from  a  keyboard.  If,  for  example,  the  computer  must 
evaluate  the  expression 

Z  =  LN  (A  X  SIN  (B  X  EXPCC  x  .1 

it  must  work  backward.  That  is,  the  order  of  operations  is 

■  Calculate  C  x  Y 

•  Calculate  EXP  (C  X  Y) 

•  Calculate  B  x  EXP(C  x  Y) 

■  Calculate  SIN  (B  x  EXP(C  x  Y)) 

•  Calculate  A  x  SIN  (B  x  EXP(C  x  Y)) 

•  Calculate  LN(A  x  SIN(B  x  EXP(C  x  Y))) . 

Working  backward  is  convenient  when  the  computer  cannot  start  a  task  until  it  has 
received  an  entire  line  or  command.  It  must  then  work  back  to  the  beginning. 
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•  Autopostdecrementing.  In  autopostdecrementing,  the  address  register  is  decre- 
mented automatically  after  it  is  used.  Autopostdecrementing  can  be  implemented  on 
the  Z80  by  decrementing  a  register  pair  after  using  it  as  an  address. 


Examples 

•  Load  the  accumulator  using  autopostdecrementing  on  register  pair  HL. 

LD       A,  (HL.)  ; FETCH  DATA 

DEC     HL  ; AUTOPOSTDECREMENT  HL 

•  Store  the  accumulator  using  autopostdecrementing  on  register  pair  DE. 

LD       (DE.),A  ;  STORE  DATA 

DEC     DE  ! AUTOPOSTDECREMENT  DE 

•  Load  register  pair  DE  starting  at  the  address  in  HL.  Afterward,  decrement  HL 


INC  HL  J  FETCH  MSB 

LD  D,  (HL.) 

DEC  HL  ; FETCH  LSB 

LD  E,  (HL.) 

DEC  HL  ; AUTOPOSTDECREMENT  HL  BY  2 

DEC  HL 

Autodecrementing  by  2  is  essential  in  handUng  arrays  of  addresses  or  16-bit  data  items. 

•  Store  the  accumulator  using  autopostdecrementing  on  memory  locations  ADDR 
and  ADDR-hl. 

LD      HL,(ADDR)  ; FETCH  INDIRECT  ADDRESS 

LD       (HL>,A  ; STORE  DATA 

DEC    HL  ! AUTOPOSTDECREMENT  INDIRECT  ADDRESS 

LD  (ADDR>,HL 

Autopostdecrementing  can  be  combined  with  indirection.  Here  memory  locations 
ADDR  and  ADDR-I- 1  could  point  to  the  next  empty  location  in  a  buffer. 

•  Transfer  control  to  the  address  stored  at  the  address  in  memory  locations 
NXTPGM  and  NXTPGM  +  1.  Then  decrement  those  locations  by  2. 


LD 

HL,  (NXTPGM.) 

! FETCH  POINTER 

INC 

HL 

5 FETCH  STARTING  ADDRESS 

LD 

D, (HL> 

DEC 

HL 

LD 

E,  (HL.) 

DEC 

HL 

} AUTOPOSTDECREMENT  PO I NTER 

DEC 

HL 

LD 

(NXTPGM) ,HL 

EX 

DE,HL 

J  JUMP  TO  STARTING  ADDRESS 

JP 

(HL) 

Here  NXTPGM  and  NXTPGM-I- 1  point  to  the  starting  address  of  the  next  routine 
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the  processor  is  to  execute.  Initially,  NXTPGM  and  NXTPGM+1  contain  FINAL, 
the  address  of  the  last  entry  in  a  table  of  routines.  A  typical  table  would  be 

DW      ROUTO  ; STARTING  ADDRESS  OF  ROUTINE  0 

DW      ROUTl  J  STARTING  ADDRESS  OF  ROUTINE  1 

FINAL:         DW      ROUTL  ; STARTING  ADDRESS  OF  LAST  ROUTINE 

Here  the  computer  works  through  the  table  backward.  This  approach  is  useful  in 
interpreting  commands  entered  in  the  normal  left-to-right  manner  from  a  keyboard. 
For  example,  assume  that  the  operator  of  a  process  controller  enters  the  command 
SETTEMP(POSITION2)=  MEAN(TEMP(POSITION  1),  TEMP(POSITION  3)). 
The  controller  program  must  execute  the  command  working  right-to-left  and  starting 
from  inside  the  inner  parentheses  as  follows: 

1.  Determine  the  index  corresponding  to  POSITION  1. 

2.  Obtain  TEMP(POSITION  1)  from  a  table  of  temperature  readings. 

3.  Determine  the  index  corresponding  to  POSITION  3. 

4.  Obtain  TEMP(POSITION  3)  from  a  table  of  temperature  readings. 

5.  Evaluate  MEAN(TEMP(POSITION  l),TEMP(POSITION  3))  by  executing 
the  MEAN  program  with  the  two  entries  as  data. 

6.  Determine  the  index  corresponding  to  POSITION  2. 

7.  Execute  the  SET  function,  which  presumably  involves  setting  controls  and 
parameters  to  achieve  the  desired  value  of  TEMP  (POSITION  2), 

The  operator  enters  the  command  working  left  to  right  and  from  outer  parentheses 
to  inner  parentheses.  The  computer,  on  the  other  hand,  must  execute  it  inside  out 
(starting  from  the  inner  parentheses)  and  right  to  left.  Autodecrementing  is  obviously 
a  handy  way  to  implement  this  reversal. 

•  Indirect  preindexed  addressing  (preindexing).  In  preindexing,  the  processor 
must  first  calculate  an  indexed  address  and  then  use  that  address  indirectly.  Since  the 
indexed  table  must  consist  of  2-byte  indirect  addresses,  the  indexing  must  involve  a 
multiplication  by  2. 

Examples 

•  Load  the  accumulator  using  preindexing.  The  base  address  is  in  an  index  register 
and  the  index  is  a  constant  INDEX. 

LD      L,  (>;y+2«lNDEX)  jOBTAIN  LSB  OF  ADDRESS 

LD      H,  (>!y+2« INDEX +  1.)         ;  OBTAIN  MSB  OF  ADDRESS 
LD      A, (HL)  ;OBTAIN  DATA  INDIRECTLY 
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Because  of  the  limitations  of  Z80  indexing,  this  approach  works  only  when  INDEX  is  a 
constant. 

•  Load  the  accumulator  using  preindexing.  The  base  address  is  in  register  pair  HL 
and  the  index  is  in  the  accumulator. 


ADD 

A, A 

; DOUBLE  INDEX  FOR  2-BYTE  ENTRIES 

LD 

E,  A 

; EXTEND  INDEX  TO  16  BITS 

LD 

D,0 

ADD 

HL,DE 

; CALCULATE  INDEXED  ADDRESS 

LD 

E, <HL) 

J  OBTAIN  INDIRECT  ADDRESS 

INC 

HL 

LD 

D,  (.HL) 

LD 

A, (DE) 

J  OBTAIN  DATA  INDIRECTLY 

•  Store  the  accumulator  using  preindexing.  The  base  address  is  in  memory  locations 
ADDR  and  ADDR+1  and  the  index  is  a  constant  INDEX. 


LD  xy,(ADDR.>  {OBTAIN  BASE  ADDRESS 

LD  L, (xy+2»INDEX>  sOBTAIN  INDIRECT  ADDRESS 

LD  H,  (>!y+2«INDEX+l) 

LD  (HL.l,A  ;  STORE  DATA  INDIRECTLY 


•  Store  the  accumulator  using  preindexing.  The  base  address  is  in  memory  locations 
ADDR  and  ADDR+I  and  the  index  is  in  memory  location  INDEX. 


LD 

HL,  (ADDR.1 

; FETCH  EASE  ADDRESS 

LD 

B,A 

jSAVE  DATA 

LD 

A, (INDEX) 

f FETCH  INDEX 

ADD 

A,  A 

; DOUBLE  INDEX  FOR  2-BYTE  ENTRIES 

LD 

E,  A 

J  EXTEND  INDEX  TO  16  BITS 

LD 

D,0 

ADD 

HL,DE 

; CALCULATE  INDEXED  ADDRESS 

LD 

E, iHL) 

f OBTAIN  INDIRECT  ADDRESS 

INC 

HL 

LD 

D,  WL> 

EX 

DE,HL 

J  STORE  DATA  INDIRECTLY 

LD 

(HL.),B 

•  Transfer  control  (jump)  to  the  address  obtained  indirectly  from  the  table  starting 
at  address  JTAB.  The  index  is  in  the  accumulator. 


ADD 

A, A 

; DOUBLE  INDEX  FOR  2-BYTE  ENTRIES 

LD 

E,A 

J  EXTEND  INDEX  TO  16  BITS 

LD 

D,0 

LD 

HL, JTAB 

;GET  BASE  ADDRESS 

ADD 

HL,DE 

; CALCULATE  INDEXED  ADDRESS 

LD 

E,  (HL.> 

; OBTAIN  INDIRECT  ADDRESS 

INC 

HL 

LD 

D, (HL) 

EX 

DE,HL 

jJUMP  TO  INDIRECT  ADDRESS 

JP 

(HL) 
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The  table  starting  at  address  JTAB  would  appear  as  follows: 

JTAB:  DW      ROUTO  ; STARTING  ADDRESS  OF  ROUTINE  0 

DM      ROLITl  !  STARTING  ADDRESS  OF  ROUTINE  1 

DW      R0UT2  J  STARTING  ADDRESS  OF  ROUTINE  2 


•  Indirect  postindexed  addressing  (postindexing).  In  postindexing,  the  processor 
must  first  obtain  an  indirect  address  and  then  apply  indexing  with  that  address  as  the 
base.  Thus  the  indirect  address  tells  the  processor  where  the  table  or  array  starts. 


Examples 

•  Load  a  register  using  postindexing.  The  base  address  is  in  memory  locations 
ADDR  and  ADDR+1  and  the  index  is  a  constant  OFFSET 

LD       xy,(ADDR)  ; OBTAIN  BASE  ADDRESS  INDIRECTLY 

LD      reg, (xy+OFFSET>;OETAIN  DATA 

This  approach  is  useful  when  ADDR  and  ADDR+1  contain  the  base  address  of  a 
data  structure  and  OFFSET  is  the  fixed  distance  from  the  base  address  to  a  particular 
data  item. 

•  Load  the  accumulator  using  postindexing.  The  base  address  is  in  memory  loca- 
tions ADDR  and  ADDR+ 1  and  the  index  is  in  the  accumulator. 

LD  HL,  (ADDR,>  jOBTAIN  BASE  ADDRESS  INDIRECTLY 

LD  E,A  ; EXTEND  INDEX  TO  16  BITS 

LD  0,0 

ADD  HL,DE  ; CALCULATE  INDEXED  ADDRESS 

LD  A,  (HL.>  ! OBTAIN  DATA 

•  Store  a  register  using  postindexing.  The  base  address  is  in  memory  locations 
ADDR  and  ADDR+1  and  the  index  is  a  constant  OFFSET. 

LD       xy,(ADDR.)  jOETAIN  BASE  ADDRESS  INDIRECTLY 

LD       (xy+OFFSET.)  ,r eg;  STORE  DATA  POSTINDEXED 

•  Store  the  accumulator  using  postindexing.  The  base  address  is  in  memory  loca- 
tions ADDR  and  ADDR+ 1  and  the  index  is  in  memory  location  INDEX. 

LD  HL,(ADDR.>  ; OBTAIN  BASE  ADDRESS  INDIRECTLY 

LD  B,A  ;SAVE  DATA 

LD  A,  (INDEX,>  ;OBTAIN  INDEX 

LD  E,A  jEXTEND  INDEX  TO  16  BITS 

LD  D,0 

ADD  HL,DE  ; CALCULATE  INDEXED  ADDRESS 

LD  (HL),B  J  STORE  DATA 

By  changing  the  contents  of  memory  locations  ADDR  and  ADDR+ 1 ,  we  can  make 
this  routine  operate  on  many  different  arrays. 
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■  Transfer  control  (jump)  to  the  address  obtained  by  indexing  from  the  base  address 
in  memory  locations  ADDR  and  ADDR+1.  The  index  is  a  constant  OFFSET. 

LD  xy,(ADDR)  fOBTAIN  BASE  ADDRESS  INDIRECTLY 

LD  L, txy+DFFSET)     jOBTAIN  LSB  OF  DESTINATION 

LD  H, (xy+OFFSET+1) J  OBTAIN  MSB  OF  DESTINATION 

JP  (HL)  ;JUHP  TO  DESTINATION 

This  procedure  is  useful  when  a  data  structure  contains  the  starting  address  of  a 
routine  at  a  fixed  offset.  The  routine  could,  for  example,  be  a  driver  for  an  1/  O  control 
block,  an  error  routine  for  a  mathematical  function,  or  a  control  equation  for  a  process 
loop. 

•  Transfer  control  Gump)  to  the  address  obtained  by  indexing  from  the  base  address 
in  memory  locations  ADDR  and  ADDR+1.  The  index  is  in  the  accumulator. 

LD  B,A  ; TRIPLE  INDEX  FOR  3-BYTE  ENTRIES 

ADD  A, A 

ADD  A,B 

LD  E,A  ;  EXTEND  INDEX  TO  16  BITS 

LD  D.O 

LD  HL,(ADDR.)  ;  OBTAIN  BASE  ADDRESS  INDIRECTLY 

ADD  HL,DE  ; CALCULATE  INDEXED  ADDRESS 

JP  (HL)  ;AND  TRANSFER  CONTROL  TO  IT 

The  table  contains  3-byte  JP  instructions;  a  typical  example  is 

BASE!  JP       ROUTO  ; JUMP  TO  ROUTINE  0 

JP      ROUTl  ;JUMP  TO  ROUTINE  1 

JP      R0UT2  ;JUMP  TO  ROUTINE  2 


The  address  BASE  must  be  placed  in  memory  locations  ADDR  and  ADDR+1. 
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This  chapter  describes  common  errors  in  Z80  assembly  language  programs.  The 
final  section  describes  common  errors  in  input/ output  drivers  and  interrupt  service 
routines.  Our  aims  here  are  the  following: 

•  To  warn  programmers  of  potential  trouble  spots  and  sources  of  confusion. 

•  To  describe  likely  causes  of  programming  errors. 

•  To  emphasize  the  techniques  and  warnings  presented  in  Chapters  1  and  2. 

•  To  inform  maintenance  programmers  of  likely  places  to  look  for  errors  and 
misinterpretations. 

•  To  provide  the  beginner  with  a  starting  point  in  the  difficult  process  of  locating 
and  correcting  errors. 

Of  course,  no  list  of  errors  can  be  complete.  Only  the  most  common  errors  are 
emphasized  — not  the  infrequent  or  subtle  errors  that  frustrate  even  the  experienced 
programmer.  However,  most  errors  are  remarkably  obvious  once  uncovered,  and  this 
discussion  should  help  in  debugging  most  programs. 


CATEGORIZATION  OF  PROGHAIVIMING  ERRORS 

Common  Z80  programming  errors  can  be  divided  into  the  following  categories: 

•  Reversing  the  order  of  operands  or  parts  of  operands.  Typical  errors  include 
reversing  source  and  destination  in  load  instructions,  inverting  the  format  in  which 
16-bit  quantities  are  stored,  and  inverting  the  direction  of  subtractions  or  comparisons. 
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•  Using  the  flags  improperly.  Typical  errors  include  using  the  wrong  flag  (such  as 
Sign  instead  of  Carry),  branching  after  instructions  that  do  not  affect  a  particular  flag, 
inverting  branch  conditions  (particularly  those  involving  the  Zero  flag),  branching 
incorrectly  in  equality  cases,  and  changing  a  flag  accidentally  before  branching. 

•  Confusing  registers  and  register  pairs.  A  typical  error  is  operating  on  a  register 
instead  of  on  a  register  pair. 

•  Confusing  addresses  and  data.  The  most  common  error  is  omitting  the  paren- 
theses around  an  address  and  hence  accidentally  using  immediate  addressing  instead 
of  direct  addressing.  Another  error  is  confusing  registers  or  register  pairs  with  the 
memory  locations  addressed  via  register  pairs. 

•  Using  the  wrong  formats.  Typical  errors  include  using  BCD  (decimal)  instead  of 
binary,  or  vice  versa,  and  using  binary  or  hexadecimal  instead  of  ASCII. 

•  Handling  arrays  incorrectly.  The  usual  problem  is  going  outside  the  array's 
boundaries. 

•  Ignoring  implicit  effects.  Typical  errors  include  using  the  accumulator,  a  register 
pair,  the  stack  pointer,  flags,  or  memory  locations  without  considering  the  effects  of 
intervening  instructions.  Most  errors  arise  from  instructions  that  have  unexpected, 
implicit,  or  indirect  effects. 

•  Failing  to  provide  proper  initial  conditions  for  routines  or  for  the  microcomputer 
as  a  whole.  Most  routines  require  the  initialization  of  counters,  indirect  addresses,  base 
addresses,  registers,  flags,  and  temporary  storage  locations.  The  microcomputer  as  a 
whole  requires  the  initialization  of  the  interrupt  system  and  all  global  RAM  addresses. 
(Note  particularly  indirect  addresses  and  counters.) 

•  Organizing  the  program  incorrectly.  Typical  errors  include  skipping  or  repeating 
initialization  routines,  failing  to  update  counters  or  address  registers,  and  forgetting  to 
save  intermediate  or  final  results. 

A  common  source  of  errors  that  is  beyond  the  scope  of  this  discussion  is  conflict 
between  user  programs  and  systems  programs.  A  simple  example  of  conflict  is  for  a 
user  program  to  save  data  in  memory  locations  that  a  systems  program  also  uses.  The 
user  program's  data  thus  changes  mysteriously  whenever  the  systems  program  is 
executed. 

More  complex  sources  of  conflict  include  the  interrupt  system,  input/ output  ports, 
the  stack,  and  the  flags.  After  all,  systems  programs  must  employ  the  same  resources  as 
user  programs.  Systems  programs  generally  attempt  to  save  and  restore  the  user's 
environment,  but  they  often  have  subtle  or  unexpected  effects.  Making  an  operating 
system  transparent  to  the  user  is  a  problem  comparable  to  devising  a  set  of  regulations, 
laws,  or  tax  codes  that  have  no  loopholes  or  side  effects. 
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REVERSING  THE  ORDER  OF  OPERANDS 

The  following  instructions  and  conventions  are  the  most  common  sources  of  errors: 

•  The  LD  D,S  instruction  moves  the  contents  of  S  to  D.  Reversing  the  source  and 
the  destination  in  LD  instructions  is  probably  the  single  most  common  error  in  Z80 
assembly  language  programs.  The  best  way  to  avoid  this  problem  is  to  use  the  operator 
notation  described  by  Duncan. ' 

•  16-bit  addresses  and  data  items  are  assumed  to  be  stored  with  their  less  significant 
bytes  first  (that  is,  at  the  lower  address).  This  convention  becomes  particularly  confus- 
ing in  instructions  that  load  or  store  register  pairs  or  use  the  stack. 

•  The  CP  instruction  subtracts  its  operand  from  the  accumulator,  not  the  other  way 
around.  Thus,  CP  sets  the  flags  as  if  the  processor  had  calculated  (A)  —  OPER,  where 
OPER  is  the  operand  specified  in  the  instruction. 

Examples 

1.  LD  A,B 

This  instruction  loads  the  accumulator  from  register  B.  Since  it  does  not  change  B, 
the  instruction  acts  Hke  "copy  B  into  A." 

2.  LD(HL),A 

This  instruction  stores  the  accumulator  at  the  memory  address  in  register  pair  HL. 
Since  it  does  not  change  the  accumulator,  the  instruction  acts  Hke  "copy  A  into 
memory  addressed  by  HL." 

3.  LD(2040H),A 

The  address  2040 16  occupies  the  two  bytes  of  program  memory  immediately  follow- 
ing the  operation  code;  40i6  comes  first  and  20i6  last.  This  order  is  particularly 
important  to  remember  when  entering  or  changing  an  address  at  the  object  code  level 
during  debugging. 

4.  PUSH  HL 

This  instruction  stores  register  pair  HL  in  memory  at  the  addresses  immediately 
below  the  initial  contents  of  the  stack  pointer  (that  is,  at  addresses  S-1  and  S-2  if  S  is  the 
initial  contents  of  the  stack  pointer).  Register  H  is  stored  at  address  S-1  and  L  at  S-2  in 
the  usual  upside-down  format. 

5.  LD  HL,(2050H) 

This  instruction  loads  register  L  from  memory  address  2050)6  and  H  from  2051  jg. 
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6.  LD  (3600H),HL 

This  instruction  stores  register  L  at  memory  address  3600]6  and  H  at  address  3601  ig. 

7.  C  P  B 

This  instruction  sets  the  flags  as  if  register  B  had  been  subtracted  from  the 
accumulator. 

8.  CP25H 

This  instruction  sets  the  flags  as  if  the  number  25 16  had  been  subtracted  from  the 
accumulator. 


USING  THE  FLAGS  INCORMCTLY 

Z80  instructions  have  widely  varying  effects  on  the  flags.  There  are  few  general  rules, 
and  even  instructions  with  similar  meanings  may  work  differently.  Cases  that  require 
special  caution  are 

•  Data  transfer  instructions  such  as  LD  and  EX  (except  EX  AF,  AF')  do  not  affect 
any  flags.  You  may  need  an  otherwise  superfluous  arithmetic  or  logical  instruction 
(such  as  AND  A,  DEC,  INC,  or  OR  A)  to  set  the  flags. 

•  The  Carry  flag  acts  as  a  borrow  after  CP,  SBC,  or  SUB  instructions;  that  is,  the 
Carry  is  set  if  the  8-bit  unsigned  subtraction  requires  a  borrow.  If,  however,  you 
implement  subtraction  by  adding  the  two's  or  ten's  complement  of  the  subtrahend,  the 
Carry  is  an  inverted  borrow;  that  is,  the  Carry  is  cleared  if  the  8-bit  unsigned 
subtraction  requires  a  borrow  and  set  if  it  does  not. 

•  After  a  comparison  (CP),  the  Zero  flag  indicates  whether  the  operands  are  equal;  it 
is  set  if  they  are  equal  and  cleared  if  they  are  not.  There  is  an  obvious  source  of 
confusion  here— JZ  means  "jump  if  the  result  is  0,"that  is,  "jump  if  the  Zero  flag  is  1." 
JNZ,  of  course,  has  the  opposite  meaning. 

■  When  comparing  unsigned  numbers,  the  Carry  flag  indicates  which  number  is 
larger.  CP  sets  Carry  if  the  accumulator  is  less  than  the  other  operand  and  clears  it  if  the 
accumulator  is  greater  than  or  equal  to  the  other  operand.  Note  that  the  Carry  is 
cleared  if  the  operands  are  equal.  If  this  division  of  cases  ("greater  than  or  equal"  and 
"less  than")  is  not  what  you  want  (that  is,  you  want  the  division  to  be  "greater  than"  and 
"less  than  or  equal"),  you  can  reverse  the  subtraction,  subtract  1  from  the  accumulator, 
or  add  I  to  the  other  operand. 

•  In  comparing  signed  numbers,  the  Sign  flag  indicates  which  operand  is  larger 
unless  two's  complement  overflow  occurs  (see  Chapter  1).  CP  sets  the  Sign  flag  if  the 
accumulator  is  less  than  the  other  operand  and  clears  it  if  the  accumulator  is  greater 
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than  or  equal  to  the  other  operand.  Note  that  comparing  equal  operands  clears  the 
Sign  flag.  As  with  the  unsigned  numbers,  you  can  handle  the  equality  case  in  the 
opposite  way  by  adjusting  either  operand  or  by  reversing  the  subtraction.  If  overflow 
occurs  (signified  by  the  setting  of  the  Parity/  Overflow  flag),  the  sense  of  the  Sign  flag  is 
inverted. 

■  All  logical  instructions  except  CPL  clear  the  Carry  flag.  AND  A  or  OR  A  is,  in 
fact,  a  quick,  simple  way  to  clear  Carry  without  affecting  any  registers.  CPL  affects  no 
flags  at  all  (XOR  OFFH  is  an  equivalent  instruction  that  affects  the  flags). 

•  The  common  way  to  execute  code  only  if  a  condition  is  true  is  to  branch  around  it 
if  the  condition  is  false.  For  example,  to  increment  register  B  if  Carry  is  1,  use  the 
sequence 

JR  NCNEXT 
INC  E 
NEXT:  NOP 

The  branch  occurs  if  Carry  is  0. 

■  Many  16-bit  arithmetic  instructions  have  little  effect  on  the  flags.  INC  and  DEC  do 
not  affect  any  flags  when  applied  to  register  pairs  or  index  registers;  ADD  HL  and 
ADD  xy  affect  only  the  Carry  flag.  The  hmited  effects  on  the  flags  show  that  these 
instructions  are  intended  for  address  arithmetic,  not  for  the  processing  of  16-bit  data. 
Note,  however,  that  ADC  HL  and  SBC  HL  affect  all  the  flags  and  can  be  used  for 
ordinary  processing  of  16-bit  data. 

•  INC  and  DEC  do  not  affect  the  Carry  flag.  This  allows  them  to  be  used  for 
counting  in  loops  that  perform  multiple  byte  arithmetic.  (The  Carry  is  needed  to 
transfer  carries  or  borrows  between  bytes.)  The  8-bit  versions  of  INC  and  DtiC  do, 
however,  affect  the  Zero  and  Sign  flags,  and  you  can  use  those  effects  to  determine 
whether  a  carry  or  borrow  occurred. 

•  The  special  instructions  RLCA,  RLA,  RRCA,  and  RRA  affect  only  the  Carry 
flag. 

-  Special-purpose  arithmetic  and  logical  instructions  such  as  ADD  A,A  (logical  left 
shift  accumulator),  ADC  A, A  (rotate  left  accumulator),  SUB  A  (clear  accumulator), 
and  AND  A  or  OR  A  (test  accumulator)  affect  all  the  flags. 

•  PUSH  and  POP  instructions  do  not  affect  the  flags,  except  for  POP  AF  which 
changes  all  the  flags.  Remember,  AF  consists  of  the  accumulator  (MSB)  and  the  flags 
(LSB). 

Examples 

1 .  The  sequence 

LD      A,  (2040H) 
JR       Z , DONE 
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has  unpredictable  results,  since  LD  does  not  affect  the  flags.  To  produce  a  jump  if 
memory  location  2040]6  contains  0,  use 

LD      A,  (2040H.) 

AND     A  fTEST  ACCUMULATOR 

JR  Z,DOIME 

OR  A  may  be  used  instead  of  AND  A. 

2.  The  sequence 

LD  A,E 
JP  P,DEST 

has  unpredictable  resuhs,  since  LD  does  not  affect  the  flags.  Either  of  the  following 
sequences  forces  a  jump  if  register  E  is  positive: 

LD  A,E 

AND  A 

JP  PrDEST 

or 

SUB  A 
OR  E 
JP  P.DEST 

3.  The  instruction  CP  25H  sets  the  Carry  flag  as  follows: 

•  Carry  =  1  if  the  contents  of  A  are  between  00  and  24i6. 

■  Carry  =  0  if  the  contents  of  A  are  between  25 15  and  FFjg. 

The  Carry  flag  is  set  if  A  contains  an  unsigned  number  less  than  the  other  operand 
and  is  cleared  if  A  contains  an  unsigned  number  greater  than  or  equal  to  the  other 
operand. 

If  you  want  to  set  Carry  if  the  accumulator  contains  25 16,  use  CP  26H  instead  of  CP 
25H.  That  is,  we  have 

CP  25H 

JR      CLESS  !  BRANCH  IF  (A)  LESS  THAN  25 

or 

CP  26H 

JR      CLESSEQ  ;  BRANCH  IF  (AJ  25  OR  LESS 

4.  The  sequence 

RLA 

JP  P,DONE 

has  unpredictable  results,  since  RLA  does  not  affect  the  Sign  flag.  The  correct 
sequence  (producing  a  circular  shift  that  affects  the  flags)  is 

ADC     A, A  ! SHIFT  CIRCULAR,   SETTING  FLAGS 

JP  P,DONE 
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Of  course,  you  can  also  use  the  somewhat  slower 

RLA 
RLA 

JR  CDONE 
This  approach  allows  a  relative  branch. 

5.  The  sequence 

INC  B 

JR  C.OVRFLW 

has  unpredictable  results,  since  INC  does  not  affect  the  Carry  flag.  The  correct 
sequence  is 

INC  B 

JR       Z , OVRFLW 

since  INC  does  affect  the  Zero  flag  when  it  is  applied  to  an  8-bit  operand. 

6.  The  sequence 

DEC  B 

JR       C, OVRFLW 

has  unpredictable  results,  since  DEC  does  not  affect  the  Carry  flag.  If  B  cannot  contain 
a  number  larger  than  SOjg  (unsigned),  you  can  use 

DEC  B 

JP      M, OVRFLW 

since  DEC  does  affect  the  Sign  flag  (when  applied  to  an  8-bit  operand).  Note,  however, 
that  you  will  get  an  erroneous  branch  if  B  initially  contains  81  le- 
A  longer  but  more  general  sequence  is 

INC     B  jTEST  REGISTER  B 

DEC  B 

JR       Z, OVRFLW  ! BRANCH  IF  B  CONTAINS  ZERO 

DEC  B 

Note  that  register  B  will  contain  0  (not  FFig)  if  the  program  branches  to  address 
OVRFLW. 

7.  The  sequence 

DEC  BC 

JR  NZ.LOOP 

has  unpredictable  results,  since  DEC  does  not  affect  any  flags  when  it  is  applied  to  a 
16-bit  operand.  The  correct  sequence  for  decrementing  and  testing  a  16-bit  counter  in 
register  pair  BC  is 

DEC  BC 

LD  A,C  f CHECK  IF  BC  HAS  ANY  i  BITS 

OR  B 

JR  NZ.LOOP  fEC  CANNOT  BE  ZERO  IF  ANY  BITS  ARE  1 
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This  sequence  affects  the  accumulator  and  all  the  flags,  including  Carry  (which  OR 
clears). 

8.  AND  A  or  OR  A  clears  Carry  without  affecting  any  registers.  To  clear  Carry 
without  affecting  the  other  flags,  use  the  sequence 

SCF  ; FIRST  SET  THE  CARRY  FLAG 

CCF  sTHEN  CLEAR  IT  BY  COMPLEMENTING 

9.  SUB  A  or  XOR  A  clears  the  accumulator,  the  Carry  flag,  and  the  Sign  flag  (and 
sets  the  Zero  flag).  To  clear  the  accumulator  without  affecting  the  flags,  use  LD  A,0. 

10.  The  sequence 

ADD  HL,DE 
JR  Z.BNDRY 

has  unpredictable  results,  since  ADD  HL  does  not  affect  the  Zero  flag.  To  force  a 
branch  if  the  sum  is  0,  you  must  test  HL  explicitly  as  follows: 

ADD  HL,DE 

LD      A,H  jTEST  H  AND  L  FOR  ZERO 

OR  L 

JR  Z,BNDRY 

An  alternative  is 

AND    A  ; CLEAR  CARRY 

ADC  HL,DE 
JR  Z,BNDRY 

Unlike  ADD  HL,  ADC  HL  affects  the  Zero  flag. 

CONFUSING  REGISTERS  AND  REGISTER  PAIRS 

The  rules  to  remember  are 

■  ADC,  ADD,  DEC,  INC,  LD,  and  SBC  can  be  apphed  to  either  8-bit  operands  or 
16-bit  register  pairs.  ADD,  DEC,  INC,  and  LD  can  also  be  applied  to  index  registers. 

•  AND,  OR,  SUB,  and  XOR  can  only  be  apphed  to  8-bit  operands. 

•  EX,  POP,  and  PUSH  can  only  be  applied  to  register  pairs  or  index  registers. 

•  (rp)  refers  to  the  byte  of  memory  located  at  the  address  in  the  register  pair.  It  does 
not  refer  to  either  half  of  the  register  pair  itself 

One  common  error  is  that  of  referring  to  H  or  L  instead  of  (HL).  The  use  of  register 
pairs  to  hold  addresses  means  that  certain  transfers  are  uncommon.  For  example,  LD 
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L,(HL)  would  load  register  L  from  the  address  in  HL;  HL  would  then  contain  one  byte 
of  an  address  (in  H)  and  one  byte  of  data  (in  L).  While  this  is  legal,  it  is  seldom  useful. 

Examples 

1.  LDA,H 

This  instruction  moves  register  H  to  the  accumulator.  It  does  not  change  register  H 
or  any  memory  location. 

2.  LDA,(BC) 

This  instruction  loads  the  accumulator  from  the  memory  address  in  register  pair  BC. 
It  does  not  affect  either  register  B  or  register  C. 

3.  LDH,0 

This  instruction  places  0  in  register  H.  It  does  not  affect  memory. 

4.  LD(HL),A 

This  instruction  stores  the  accumulator  in  the  memory  location  addressed  by 
register  pair  HL.  It  does  not  affect  either  H  or  L.  A  sequence  that  loads  HL  with  an 
address  indirectly  is 

LD  E,(HL)  ;GET  LSE  OF  INDIRECT  ADDRESS 

INC  HL 

LD  D, (HL)  ;GET  MSB  OF  INDIRECT  ADDRESS 

EX  DE,HL  ;PUT  INDIRECT  ADDRESS  IN  HL 

We  may  hmit  ourselves  to  a  single  temporary  register  (the  accumulator)  by  loading  the 
more  significant  byte  directly  into  H  as  follows: 

LD  A,(HL)  !GET  LSE  OF  INDIRECT  ADDRESS 

INC  HL 

LD  H,  (HL.)  J  GET  MSB  OF  INDIRECT  ADDRESS 

LD  L,A  ;MOVE  LSE  OF  ADDRESS  TO  L 

This  takes  the  same  number  of  clock  cycles  as  the  previous  sequence,  but  uses  A  instead 
of  DE  for  temporary  storage. 

5.  LD  HL,2050H 

This  instruction  loads  2050i6  into  register  pair  HL  (20i6  into  H  and  50i6  into  L). 

6.  ADD  A,(HL) 

This  instruction  adds  the  memory  byte  addressed  via  register  pair  HL  to  the 
accumulator.  It  does  not  affect  either  H  or  L. 
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7.  ADD  HL,HL 

This  instruction  adds  register  pair  HL  to  itself,  thus  shifting  HL  left  1  bit  logically. 
This  instruction  does  not  affect  the  accumulator  or  access  data  from  memory. 


CONFUSING  ADDRESSES  AND  DATA 

The  rules  to  remember  are 

•  LD  requires  an  address  when  you  want  to  move  data  to  or  from  memory.  That 
address  must  be  placed  in  parentheses. 

•  The  standard  assembler  treats  all  operands  as  data  unless  they  are  enclosed  in 
parentheses.  Thus,  if  you  omit  the  parentheses  around  an  address,  the  assembler  will 
treat  it  as  a  data  item. 

•  DJNZ,  JP,  JR,  and  CALL  always  require  addresses. 

There  is  some  confusion  with  addressing  terminology  in  jump  instructions.  These 
instructions  essentially  treat  their  operands  as  if  one  level  of  indirection  had  been 
removed.  For  example,  we  say  that  JP  2040H  uses  direct  addressing,  yet  we  do  not 
place  the  address  in  parentheses.  Furthermore,  JP  2040H  loads  2040 16  into  the 
program  counter,  much  as  LD  HL,2040H  loads  2040i6  into  register  pair  HL.  LD 
HL,(2040H)  loads  the  contents  of  memory  locations  2040i6  and  2041 into  register 
pair  HL.  Note  also  that  JP  (HL)  loads  HL  into  the  program  counter;  it  does  not  use 
HL  indirectly  or  access  the  memory  at  all. 

Examples 

1.  LD  A,40H  loads  the  number  40 16  into  the  accumulator.  LD  A,(40H)  loads  the 
contents  of  memory  location  0040  le  into  the  accumulator. 

2.  LD  HL,0C00H  loads  OCOOje  into  register  pair  HL  (OCie  into  H  and  OOie  into  L). 
LD  HL,(OCOOH)  loads  the  contents  of  memory  locations  OCOOig  and  OCOlig  into 
register  pair  HL  (the  contents  of  OCOOig  into  L  and  the  contents  of  OCOlie  into  H). 

3.  JP  (xy)  transfers  control  to  the  address  in  an  index  register.  No  indexing  is 
performed,  nor  is  the  address  used  to  access  memory. 

Confusing  addresses  and  their  contents  is  a  common  error  in  handling  data  struc- 
tures. For  example,  the  queue  of  tasks  to  be  executed  by  a  piece  of  test  equipment 
might  consist  of  a  block  of  information  for  each  task.  That  block  might  contain 

•  Starting  address  of  the  test  routine 

■  Number  of  seconds  for  which  the  test  is  to  run 
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•  Address  in  which  the  result  is  to  be  saved 

■  Upper  and  lower  thresholds  against  which  the  result  is  to  be  compared 

■  Base  address  of  the  next  block  in  the  queue. 

Thus,  the  block  contains  data,  direct  addresses,  and  indirect  addresses.  Typical 
errors  that  a  programmer  could  make  are 

■  Transferring  control  to  the  memory  locations  containing  the  starting  address  of 
the  test  routine,  rather  than  to  the  actual  starting  address. 

■  Storing  the  result  in  the  block  rather  than  in  the  address  specified  in  the  block. 

■  Using  a  threshold  as  an  address  rather  than  as  data. 

•  Assuming  that  the  next  block  starts  in  the  current  block,  rather  than  at  the  base 
address  given  in  the  current  block. 

Jump  tables  are  another  common  source  of  errors.  The  following  are  alternative 
implementations: 

•  Form  a  table  of  jump  instructions  and  transfer  control  to  the  correct  element  (for 
example,  to  the  third  jump  instruction). 

■  Form  a  table  of  destination  addresses  and  transfer  control  to  the  contents  of  the 
correct  element  (for  example,  to  the  address  in  the  third  element). 

You  will  surely  have  problems  if  the  processor  uses  jump  instructions  as  addresses  or 
vice  versa. 


FORMAT  ERRORS 

The  rules  you  should  remember  for  the  standard  Z80  assembler  are 

•  An  H  at  the  end  of  a  number  indicates  hexadecimal  and  a  B  indicates  binary. 

•  The  default  mode  for  numbers  is  decimal;  that  is,  the  assembler  assumes  all 
numbers  to  be  decimal  unless  they  are  specifically  marked  otherwise. 

■  All  operands  are  treated  as  data  unless  they  are  enclosed  in  parentheses.  Operands 
enclosed  in  parentheses  are  assumed  to  be  memory  addresses. 

•  A  hexadecimal  number  that  starts  with  a  letter  digit  (A,  B,  C,  D,  E,  or  F)  must  be 
preceded  by  0  (for  example,  OCFH  instead  of  CFH)  for  the  assembler  to  interpret  it 
correctly.  Of  course,  the  leading  0  does  not  affect  the  value  of  the  number. 

•  All  arithmetic  and  logical  operations  are  binary,  except  DAA,  which  corrects  the 
result  of  an  8-bit  binary  addition  or  subtraction  to  the  proper  BCD  value. 


1 50    Z80  ASSEMBLY  LANGUAGE  SUBROUTINES 


You  should  beware  of  the  following  common  errors: 

•  Omitting  the  H  from  a  hexadecimal  operand.  The  assembler  will  assume  it  to  be 
decimal  if  it  contains  no  letter  digits  and  to  be  a  name  if  it  starts  with  a  letter.  The 
assembler  will  indicate  an  error  only  if  it  cannot  interpret  the  operand  as  either  a 
decimal  number  or  a  name. 

•  Omitting  the  B  from  a  binary  operand.  The  assembler  will  assume  it  to  be  decimal. 

■  Confusing  decimal  (BCD)  representations  with  binary  representations.  Remem- 
ber, ten  is  not  an  integral  power  of  two,  so  the  binary  and  BCD  representations  are  not 
the  same  beyond  nine.  BCD  constants  must  be  designated  as  hexadecimal  numbers, 
not  as  decimal  numbers. 

•  Confusing  binary  or  decimal  representations  with  ASCII  representations.  An 
ASCII  input  device  produces  ASCII  characters  and  an  ASCII  output  device  responds 
to  ASCII  characters. 

Examples 

1.  LD  A,(2000) 

This  instruction  loads  the  accumulator  from  memory  address  2000io  (07D0]6),  not 
address  2000 16.  The  assembler  will  not  produce  an  error  message,  since  2000  is  a  valid 
decimal  number. 

2.  AND  00000011 

This  instruction  logically  ANDs  the  accumulator  with  the  decimal  number  II 
(IOII2),  not  with  the  binary  number  11  (3io).  The  assembler  will  not  produce  an  error 
message,  since  00000011  is  a  valid  decimal  number  despite  its  unusual  form. 

3.  ADD  A,40 

This  instruction  adds  the  number  40  jq  to  the  accumulator.  Note  that  40 10  is  not  the 
same  as  BCD  40,  which  is  40i6;  40io  =  28i6.  The  assembler  will  not  produce  an  error 
message,  since  40  is  a  valid  decimal  number. 

4.  LD  A,3 

This  instruction  loads  the  accumulator  with  the  number  3.  If  this  value  is  now  sent  to 
an  ASCII  output  device,  the  device  will  respond  as  if  it  had  received  the  character  ETX 
(03i6),  not  the  character  3  (33i6).  The  correct  version  is 


LD      A, '3' 


;OET  AN  ASCII  3 
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If  memory  location  2040 16  contains  a  single  digit,  the  sequence 

LD  A, t2040H) 
OUT  (.DEVCE),A 

will  not  print  that  digit  on  an  ASCII  output  device.  The  correct  sequence  is 

LD      A, (2040H)  ;GET  DECIMAL  DIGIT 

ADD     A,'0'  ! ADJUST  TO  ASCII 

OUT  (DEVC:E),A 

If  input  port  INDEV  contains  a  single  ASCII  decimal  digit,  the  sequence 

IN  A, (INDEV) 
LD  C2040H),A 

will  not  store  the  actual  digit  in  memory  location  2040j6.  Instead,  it  will  store  the 
ASCII  version,  which  is  the  actual  digit  plus  30i6.  The  correct  sequence  is 

IN       A,  (INDEV.)  jGET  ASCII  DIGIT 

SUE     '0'  ; ADJUST  TO  DECIMAL 

LD  (2040H),A 

Performing  decimal  arithmetic  on  the  Z80  is  awkward,  since  a  DAA  instruction  is 
required  after  each  8-bit  addition  or  subtraction.  Chapter  6  contains  programs  for 
decimal  arithmetic  operations.  Since  DAA  does  not  work  properly  after  DEC  or  INC, 
the  following  sequences  are  necessary  to  perform  decimal  increment  and  decrement 
by  1: 

•  Add  1  to  the  accumulator  in  decimal. 

ADD    A, 1 
DAA 

•  Subtract  1  from  the  accumulator  in  decimal. 

SUE  1 
DAA 

or 

ADD  f\.99H 
DAA 

In  the  second  alternative,  Carry  is  an  inverted  borrow. 


HANDLING  ARRAYS  INCORRECTLY 

The  most  common  problems  here  are  executing  an  extra  iteration  or  stopping  one 
short.  Remember,  memory  locations  BASE  through  BASE+N  contain  N+ 1  bytes,  not 
N  bytes.  It  is  easy  to  forget  the  last  entry  or  drop  the  first  one.  On  the  other  hand,  if  you 
have  N  entries,  they  will  occupy  memory  locations  BASE  through  BASE+N—  1 ;  now  it 
is  easy  to  find  yourself  working  beyond  the  end  of  the  array. 
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IMPLICIT  EFFECTS 

Some  implicit  effects  you  should  remember  are 

•  The  clearing  of  Carry  by  all  logical  operations  except  CPL. 

•  The  moving  ofthe  interrupt  flip-flop  IFF2tothe  Parity/Overflowflagby  LD  A,I 
and  LD  A,R. 

•  The  use  of  the  data  at  the  address  in  HL  by  the  digit  rotations  RRD  and  RLD. 

•  The  use  of  the  memory  address  one  larger  than  the  specified  one  by  LD 
rp,(ADDR),  LD  (ADDR),rp,  LD  xy,(ADDR),  and  LD  (ADDR),xy. 

•  The  changing  of  the  stack  pointer  by  POP,  PUSH,  CALL,  RET,  RETI,  RETN, 
and  RST. 

•  The  saving  of  the  return  address  in  the  stack  by  CALL  and  RST. 

■  The  decrementing  of  register  B  by  DJNZ. 

•  The  implicit  effects  on  BC,  DE,  and  HL  ofthe  block  compare,  input,  move,  and 
output  instructions. 

•  The  use  ofthe  Parity/ Overflow  flag  by  LDD,  LDI,  CPD,  CPDR,  CPL  and  CPIR 
to  indicate  whether  the  counter  in  BC  has  been  decremented  to  0. 

Examples 

1.  AND  OOOOllUB 

This  instruction  clears  the  Carry,  as  well  as  performing  a  logical  operation. 

2.  LDA,I 

This  instruction  not  only  loads  the  accumulator,  but  also  moves  the  interrupt 
flip-flop  IFF2  to  the  Parity/ Overflow  flag.  The  interrupt  status  can  then  be  saved 
before  the  computer  executes  a  routine  that  must  run  with  interrupts  disabled. 

3.  RRD 

This  instruction  performs  a  4-bit  (digit)  circular  shift  right  involving  the  accumula- 
tor and  the  memory  location  addressed  by  HL.  The  results  are 

•  The  4  least  significant  bits  of  A  go  into  the  4  most  significant  bits  of  the  memory 
location. 

■  The  4  most  significant  bits  of  the  memory  location  go  into  its  4  least  significant 
bits. 
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•  The  4  least  significant  bits  of  the  memory  location  go  into  the  4  least  significant 
bits  of  A. 

The  result  is  thus  a  4-bit  right  rotation  of  the  12-bit  number  made  up  of  the  4  LSBs  of 
the  accumulator  and  the  memory  byte. 

4.  LD  HL,(16EFH) 

This  instruction  loads  register  L  from  memory  location  I6EF16  and  H  from  memory 
location  I6FO16.  Note  the  implicit  use  of  address  I6FO16. 

5.  POP  HL 

This  instruction  not  only  loads  register  pair  HL  from  memory,  but  also  increments 
the  stack  pointer  by  2. 

6.  CALLSUBR 

This  instruction  not  only  transfers  control  to  address  SUBR,  but  it  also  saves  the 
address  of  the  next  sequential  instruction  in  the  stack.  Furthermore,  CALL  decre- 
ments the  stack  pointer  by  2. 

7.  DJNZ  LOOP 

This  instruction  decrements  register  B  and  branches  to  address  LOOP  if  the  result  is 
not  0.  Note  that  register  B  is  implied  as  the  counter. 

8.  LDD 

This  instruction  moves  data  from  the  address  in  HL  to  the  address  in  DE.  It  also 
decrements  BC,  DE,  and  HL  by  1.  The  Parity/ Overflow  flag  (not  the  Zero  flag)  is 
cleared  (not  set)  if  BC  is  decremented  to  0;  the  Parity/ Overflow  flag  is  set  otherwise. 

9.  CPIR 

This  instruction  compares  the  accumulator  with  the  memory  byte  at  the  address  in 
HL.  After  the  comparison,  it  increments  HL  by  1  and  decrements  BC  by  1.  It  repeats 
these  operations  until  it  decrements  BC  to  0  (indicated  by  the  Parity/ Overflow  flag 
being  cleared)  or  until  the  comparison  sets  the  Zero  flag.  Note  that  CPIR  updates  BC 
and  HL  before  it  tests  for  an  exit  condition. 

10.  OUTI 

This  instruction  transfers  data  from  the  memory  address  in  HL  to  the  output  port  in 
C.  It  then  decrements  B  (not  BC)  by  1  and  increments  HL  by  1 .  OUTI  sets  the  Zero  flag 
to  I  if  it  decrements  BC  to  0;  it  clears  the  Zero  flag  otherwise. 
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INITIALIZATION  ERRORS 

Initialization  routines  must  perform  the  following  tasks,  either  for  the  microcom- 
puter system  as  a  whole  or  for  particular  routines: 

•  Load  all  RAM  locations  with  initial  values.  This  includes  indirect  addresses  and 
other  temporary  storage.  You  cannot  assume  that  a  memory  location  contains  0  just 
because  you  have  not  used  it. 

•  Load  all  registers  and  flags  with  initial  values.  Reset  initializes  the  interrupt  system 
by  disabling  regular  interrupts  and  selecting  Mode  0.  The  startup  program  for  an 
interrupt-driven  system  must  set  the  interrupt  mode  (if  it  is  not  0),  initialize  the  stack 
pointer,  and  load  the  interrupt  vector  register  (in  Mode  2). 

•  Initialize  all  counters  and  indirect  addresses.  Pay  particular  attention  to  register 
pairs  that  are  used  as  address  registers;  you  must  initialize  them  before  using  instruc- 
tions that  refer  to  them  indirectly. 


ORGANIZING  THE  PROGRAM 
INCORRECTLY 

The  following  problems  are  the  most  common: 

•  Accidentally  reinitializing  a  register,  register  pair,  flag,  memory  location,  counter, 
or  indirect  address.  Be  sure  that  your  branches  do  not  result  in  the  repetition  of 
initialization  instructions. 

•  Failing  to  update  a  counter,  index  register,  address  register,  or  indirect  address.  A 
problem  here  may  be  a  path  that  branches  around  the  updating  instructions  or  changes 
values  before  executing  those  instructions. 

•  Forgetting  to  save  results.  It  is  remarkably  easy  to  calculate  a  result  and  then  load 
something  else  into  the  accumulator.  Identifying  this  kind  of  error  is  frustrating  and 
time-consuming,  since  all  the  instructions  that  calculate  the  result  work  properly  and 
yet  the  resuh  itself  is  being  lost.  For  example,  a  branch  may  transfer  control  to  an 
instruction  that  writes  over  the  resuh. 

•  Forgetting  to  branch  around  instructions  that  should  not  be  executed  in  a  particu- 
lar path.  Remember,  the  computer  will  execute  instructions  consecutively  unless  told 
to  do  otherwise.  Thus,  the  computer  may  fall  through  to  a  section  of  the  program  that 
you  expect  it  to  reach  only  via  a  branch.  An  unconditional  jump  instruction  will  force  a 
branch  around  the  section  that  should  not  be  executed. 
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EmOU  RiOOGNITiON  BY  ASSiMBLEHS 

Most  assemblers  will  recognize  some  common  errors  immediately,  such  as 

•  Undefined  operation  code  (usually  a  misspelling  or  the  omission  of  a  colon  after  a 
label). 

•  Undefined  name  (often  a  misspelling  or  an  omitted  definition). 

■  Illegal  character  (for  example,  a  2  in  a  binary  number  or  a  B  in  a  decimal  number). 

•  Illegal  format  (for  example,  an  incorrect  delimiter  or  the  wrong  operands). 

•  Illegal  value  (usually  a  number  too  large  for  8  or  16  bits). 

•  Missing  operand. 

•  Double  definition  (two  different  values  assigned  to  one  name). 

•  Illegal  label  (for  example,  a  label  attached  to  a  pseudo-operation  that  does  not 
allow  a  label). 

•  Missing  label  (for  example,  on  an  EQU  pseudo-operation  that  requires  one). 

These  errors  are  annoying  but  easy  to  correct.  The  only  problem  comes  when  an 
error  (such  as  omitting  the  semicolon  from  a  comment  line)  confuses  the  assembler 
completely  and  results  in  a  series  of  meaningless  error  messages. 

There  are,  however,  many  simple  errors  that  assemblers  will  not  recognize.  The 
programmer  should  be  aware  that  his  or  her  program  may  contain  such  errors  even  if 
the  assembler  does  not  report  them.  Typical  examples  are 

•  Omitted  lines.  Obviously,  the  assembler  cannot  tell  that  you  have  omitted  a  line 
completely  unless  it  contains  a  label  or  definition  that  is  used  elsewhere.  The  easiest 
Unes  to  omit  are  ones  that  are  repetitious  or  seem  unnecessary.  Typical  repetitions  are 
series  of  shifts,  branches,  increments,  or  decrements.  Instructions  that  often  appear 
unnecessary  include  AND  A,  DEC  HL,  INC  HL,  OR  A,  and  SUB  A. 

•  Omitted  designations.  The  assembler  cannot  tell  if  you  meant  an  operand  to  be 
hexadecimal  or  binary  unless  the  omission  results  in  an  illegal  character  (such  as  C  in  a 
decimal  number).  Otherwise,  the  assembler  will  assume  all  numbers  to  be  decimal. 
Problems  occur  with  hexadecimal  numbers  that  contain  no  letter  digits  (such  as  44  or 
2050)  and  with  binary  numbers  (such  as  00000110). 

■  Omitted  parentheses.  The  assembler  cannot  tell  if  you  meant  to  refer  to  a  memory 
address  unless  omitting  the  parentheses  results  in  an  error.  Many  instructions,  such  as 
LD  A,(40H),  INC  (HL),  DEC  (HL),  and  LD  HL,(2050H),  are  also  valid  without 
parentheses. 

•  Misspellings  that  are  still  valid.  Typical  examples  are  typing  AND  or  ADC  instead 
of  ADD,  DI  instead  of  EI,  or  D  instead  of  E.  Unless  the  misspelling  is  invalid,  the 
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assembler  has  no  way  of  sensing  an  error.  Valid  misspellings  are  often  a  problem  if  you 
use  names  that  look  alike,  such  as  XXX  and  XXXX,  L121  and  L112,  or  VARII  and 
VARII. 

■  Designating  instructions  as  comments.  If  you  place  a  semicolon  at  the  start  of  an 
instruction  line,  the  assembler  will  treat  the  line  as  a  comment.  This  can  be  a  perplexing 
error,  since  the  line  appears  in  the  listing  but  is  not  assembled  into  code. 

Sometimes  you  can  confuse  an  assembler  by  entering  completely  invalid  instruc- 
tions. An  assembler  may  accept  them  simply  because  its  developer  never  anticipated 
such  mistakes.  The  results  can  be  unpredictable,  much  like  the  result  of  accidentally 
entering  your  weight  instead  of  your  age  or  your  telephone  number  instead  of  your 
credit  card  number  on  a  form.  Some  cases  in  which  a  Z80  assembler  can  go  wrong  are 

•  If  you  specify  a  single  register  instead  of  a  register  pair.  Some  assemblers  will 
accept  instructions  hke  LD  A,(L),  ADD  HL,D,  or  LD  E,2040H.  They  will  produce 
meaningless  object  code  without  any  indication  of  error. 

•  If  you  enter  an  invalid  digit,  such  as  X  in  a  decimal  or  hexadecimal  number  or  7  in 
a  binary  number.  Some  assemblers  will  assign  arbitrary  values  to  such  invalid  digits. 

•  If  you  enter  an  invalid  operand  such  as  40H  in  RST,  AF  in  LD,  or  SP  in  PUSH  or 
POP.  Some  assemblers  will  accept  these  and  generate  meaningless  code. 

The  assembler  will  only  recognize  errors  that  its  developer  anticipated.  Pro- 
grammers are  often  able  to  make  mistakes  the  developer  never  imagined,  much  as 
automobile  drivers  are  often  capable  of  getting  into  predicaments  that  no  highway 
engineer  or  traffic  policeman  ever  thought  possible.  Note  that  only  a  line-by-line  hand 
checking  of  the  program  will  find  errors  that  the  assembler  does  not  recognize. 


COMMON  ERRORS  IN  I/O  DRIVERS 

Since  most  errors  in  I/O  drivers  involve  both  hardware  and  software,  they  are 
difficult  to  categorize.  Some  things  you  should  watch  for  are 

•  Confusing  input  ports  and  output  ports.  Input  port  20i6  and  output  port  20]6  are 
different  in  most  systems.  Even  when  the  two  ports  are  the  same  physically,  it  may  still 
be  impossible  to  read  back  output  data  unless  the  port  is  latched  and  buffered. 

•  Attempting  to  perform  operations  that  are  physically  impossible.  Reading  data 
from  an  output  device  (such  as  a  display)  or  sending  data  to  an  input  device  (such  as  a 
keyboard)  makes  no  physical  sense.  However,  accidentally  using  the  wrong  port 
number  will  cause  no  assembly  errors;  the  port,  after  all,  exists  and  the  assembler  has 
no  way  of  knowing  that  certain  operations  cannot  be  performed  on  it.  Similarly,  a 
program  may  attempt  to  save  data  in  an  unassigned  address  or  in  a  ROM. 
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■  Forgetting  implicit  hardware  effects.  At  times,  transferring  data  to  or  from  a  port 
will  change  the  status  lines  automatically  (as  in  most  PIO  modes).  Even  reading  or 
writing  the  port  while  debugging  a  program  will  change  status  lines.  When  using 
memory-mapped  1/  O,  be  particularly  careful  of  instructions  like  comparisons  and  BIT 
that  read  a  memory  address  even  though  they  do  not  change  any  registers.  Similarly, 
instructions  like  BIT,  RES,  SET,  DEC,  INC,  and  shifts  can  both  read  and  write  a 
memory  address.  Automatic  port  operations  can  save  parts  and  simplify  programs,  but 
you  must  remember  how  they  work  and  when  they  occur. 

•  Reading  or  writing  without  checking  status.  Many  devices  can  only  accept  or 
provide  data  when  a  status  line  indicates  they  are  ready.  Transferring  data  to  or  from 
them  at  other  times  will  have  unpredictable  results. 

•  Ignoring  the  differences  between  input  and  output.  Remember  that  an  input  device 
normally  starts  out  not  ready —it  has  no  data  available  although  the  computer  is  ready 
to  accept  data.  On  the  other  hand,  an  output  device  normally  starts  out  ready —that  is, 
it  could  accept  data  but  the  computer  usually  has  none  to  send  it.  In  many  situations 
(particularly  when  using  PIOs),  you  may  have  to  send  a  null  character  (something  that 
has  no  effect)  to  each  output  port  just  to  change  its  state  from  ready  to  not  ready 
initially. 

•  Failing  to  keep  a  copy  of  output  data.  Generally,  you  will  not  be  able  to  read  data 
back  from  an  output  port.  You  must  save  a  copy  in  memory  if  it  could  be  needed  later  to 
repeat  a  transmission,  change  some  bits,  or  restore  interrupt  status  (the  data  could,  for 
example,  be  the  current  priority  level). 

•  Reading  data  before  it  is  stable  or  while  it  is  changing.  Be  sure  that  you  understand 
exactly  when  the  data  from  the  input  device  is  guaranteed  to  be  stable.  In  the  case  of 
switches  that  may  bounce,  you  may  want  to  sample  them  twice  (more  than  a  debounc- 
ing time  apart)  before  taking  any  action.  In  the  case  of  keys  that  may  bounce,  you  may 
want  to  take  action  only  when  they  are  released  rather  than  when  they  are  pressed. 
Acting  on  release  also  forces  the  operator  to  release  the  key  rather  than  holding  it 
down.  In  the  case  of  persistent  data  (such  as  in  serial  I/O),  you  should  center  the 
reception  (that  is,  read  the  data  near  the  centers  of  the  pulses  rather  than  at  the  edges 
where  the  values  may  be  changing). 

■  Forgetting  to  reverse  the  polarity  of  data  being  transferred  to  or  from  devices  that 
operate  in  negative  logic.  Many  simple  1/  O  devices,  such  as  switches  and  displays,  use 
negative  logic;  a  logic  0  means  that  a  switch  is  closed  or  a  display  is  lit.  Common 
ten-position  switches  or  dials  also  often  produce  data  in  negative  logic,  as  do  many 
encoders.  The  solution  is  simple  — complement  the  data  using  CPL  after  reading  it  or 
before  sending  it. 

•  Confusing  actual  I/O  ports  with  registers  that  are  inside  I/O  chips.  Programmable 
I/O  devices,  such  as  the  CTC,  PIO,  and  SIO,  typically  have  control  or  command 
registers  that  determine  how  the  device  operates  and  status  registers  that  reflect  the 
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current  state  of  the  device  or  the  transfer.  These  registers  are  inside  the  chips;  they  are 
not  connected  to  peripherals.  Transferring  data  to  or  from  these  registers  is  not  the 
same  as  transferring  data  to  or  from  actual  I/O  ports. 

■  Using  bidirectional  ports  improperly.  Many  devices,  such  as  the  PIO,  have  bidirec- 
tional I/O  ports  that  can  be  used  either  for  input  or  output.  Normally,  resetting  the 
computer  makes  these  ports  inputs  in  order  to  avoid  initial  transients,  so  the  program 
must  explicitly  change  them  to  outputs  if  necessary.  Be  particularly  careful  of  instruc- 
tions that  read  bits  or  ports  that  are  designated  as  outputs  or  that  write  into  bits  or 
ports  designated  as  inputs.  The  only  way  to  determine  what  will  happen  is  to  read  the 
documentation  for  the  specific  device. 

•  Forgetting  to  clear  status  after  performing  an  I/O  operation.  Once  the  processor 
has  read  data  from  a  port  or  written  data  into  a  port,  that  port  should  revert  to  the  not 
ready  state.  Some  I/O  devices  change  the  status  of  their  ports  automatically  after  input 
or  output  operations,  but  others  either  do  not  or  they  change  status  automatically  only 
after  input.  Leaving  the  status  set  can  result  in  an  endless  loop  or  erratic  operation. 


COMIVION  ERRORS  IN  INTERHUPT 
SERVICi  ROUTINiS 

Many  errors  that  are  related  to  interrupts  involve  both  hardware  and  software.  The 
following  are  some  of  the  more  common  mistakes: 

•  Failing  to  reenable  interrupts.  The  Z80  disables  interrupts  automatically  after 
accepting  one,  but  does  not  reenable  interrupts  unless  it  executes  EI. 

•  Failing  to  save  registers.  The  Z80  does  not  automatically  save  any  registers  except 
the  program  counter,  so  any  registers  that  the  service  routine  uses  must  be  saved 
explicitly  in  the  stack. 

•  Saving  or  restoring  registers  in  the  wrong  order.  Registers  must  be  restored  in  the 
opposite  order  from  that  in  which  they  were  saved. 

•  Enabling  interrupts  before  initializing  modes,  priorities,  the  interrupt  vector 
register,  or  other  parameters  of  the  interrupt  system. 

•  Forgetting  that  the  response  to  an  interrupt  includes  saving  the  program  counter 
at  the  top  of  the  stack.  The  return  address  will  thus  be  on  top  of  whatever  else  is  in  the 
stack. 

•  Not  disabling  the  interrupt  during  multi-byte  transfers  or  instruction  sequences 
that  cannot  be  interrupted.  In  particular,  watch  for  possible  partial  updating  of  data 
(such  as  time)  that  a  service  routine  may  use. 
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•  Failing  to  reenabie  interrupts  after  a  sequence  that  must  be  run  with  interrupts 
disabled.  One  problem  here  is  that  interrupts  should  not  be  enabled  afterward  if  they 
were  not  enabled  originally.  This  requirement  is  difficult  to  meet  on  the  Z80  since  its 
interrupt  enable  is  not  directly  readable.  The  only  way  to  access  the  interrupt  flip-flop 
is  by  executing  LD  A,I  or  LD  A,R;  either  instruction  moves  the  interrupt  flip-flop  to 
the  Parity/ Overflow  flag. 

•  Failing  to  clear  the  signal  that  caused  the  interrupt.  The  service  routine  must  clear 
the  interrupt  even  if  no  I/O  operations  are  necessary.  For  example,  even  when  the 
processor  has  no  data  to  send  to  an  interrupting  output  device,  it  must  nonetheless 
either  clear  or  disable  the  interrupt.  Otherwise,  the  processor  will  get  caught  in  an 
endless  loop.  Similarly,  a  real-time  clock  will  typically  require  no  servicing  other  than 
an  updating  of  time,  but  the  service  routine  still  must  clear  the  clock  interrupt.  This 
clearing  may  involve  reading  a  timer  register. 

•  Failing  to  communicate  with  the  main  program.  The  main  program  will  not  know 
that  the  interrupt  has  been  serviced  unless  it  is  informed  explicitly.  The  usual  way  to 
inform  the  main  program  is  to  have  the  service  routine  change  a  flag.  The  main 
program  can  tell  from  the  flag's  value  whether  the  service  routine  has  been  executed. 
This  procedure  works  like  a  postal  patron  raising  a  flag  to  indicate  that  there  is  mail  to 
be  picked  up.  The  letter  carrier  lowers  the  flag  after  picking  up  the  mail.  Note  that  this 
simple  procedure  means  that  the  main  program  must  examine  the  flag  often  enough  to 
avoid  missing  changes  in  its  value.  Of  course,  the  programmer  can  always  provide  a 
buffer  that  can  hold  many  data  items. 

■  Failing  to  save  and  restore  priority.  The  priority  of  an  interrupt  is  often  held  in  a 
write-only  register  or  in  a  memory  location.  That  priority  must  be  saved  just  like  a 
CPU  register  and  restored  properly  at  the  end  of  the  service  routine.  If  the  priority 
register  is  write-only,  a  copy  of  its  contents  must  be  saved  in  memory. 
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Introduction  to  the 

Program  Section 


The  program  section  contains  sets  of  assembly  language  subroutines  for  the  Z80 
microprocessor.  Each  subroutine  is  documented  with  an  introductory  section  and 
comments  and  is  followed  by  at  least  one  example  of  its  use.  The  introductory  material 
contains  the  following  information  about  the  purpose  of  the  routine:  its  procedure  and 
the  registers  that  are  used;  the  execution  time,  program  size,  and  data  memory 
required  for  the  routine;  as  well  as  special  cases,  entry  conditions,  and  exit  conditions. 

We  have  made  each  routine  as  general  as  possible.  This  is  particularly  difficult  for 
the  input/ output  (I/O)  and  interrupt  service  routines  described  in  Chapters  10  and  11, 
since  these  routines  are  always  computer-dependent  in  practice.  In  such  cases,  we  have 
limited  the  computer-dependence  to  generalized  input  and  output  handlers  and  inter- 
rupt managers.  We  have  drawn  specific  examples  from  computers  based  on  the  CP/  M 
operating  system,  but  the  general  principles  are  applicable  to  other  Z80-based  com- 
puters as  well. 

In  all  routines,  we  have  used  the  following  parameter  passing  techniques: 

1 .  A  single  8-bit  parameter  is  passed  in  the  accumulator.  A  second  8-bit  parameter  is 
passed  in  register  B,  and  a  third  in  register  C. 

2.  A  single  16-bit  parameter  is  passed  in  register  pair  HL  with  the  more  significant 
byte  in  H.  A  second  16-bit  parameter  is  passed  in  register  pair  DE  with  the  more 
significant  byte  in  D. 

3.  Large  numbers  of  parameters  are  passed  in  the  stack,  either  directly  or  indirectly. 
We  assume  that  subroutines  are  entered  via  a  CALL  instruction  that  places  the  return 
address  at  the  top  of  the  stack,  and  hence  on  top  of  the  parameters. 

Where  there  has  been  a  choice  between  execution  time  and  memory  usage,  we  have 
generally  chosen  to  minimize  execution  time.  We  have  therefore  avoided  slowly 
executing  instructions  such  as  stack  transfers  and  instructions  that  use  the  index 
registers,  even  when  they  would  make  programs  shorter.  However,  we  have  used 
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relative  jumps  whenever  possible  rather  than  the  slightly  faster  but  longer  absolute 
jumps  to  make  programs  easier  to  relocate. 

We  have  also  chosen  the  approach  that  minimizes  the  number  of  repetitive  calcula- 
tions. For  example,  in  the  case  of  array  indexing,  the  number  of  bytes  between  the 
starting  addresses  of  elements  differing  only  by  one  in  a  particular  subscript  (known  as 
the  size  of  that  subscript)  depends  only  on  the  number  of  bytes  per  element  and  the 
bounds  of  the  array.  Thus,  the  sizes  of  the  various  subscripts  can  be  calculated  as  soon 
as  the  bounds  of  the  array  are  known;  the  sizes  are  therefore  used  as  parameters  for  the 
indexing  routines,  so  that  they  need  not  be  calculated  each  time  a  particular  array  is 
indexed. 

As  for  execution  time,  we  have  specified  it  for  most  short  routines.  For  longer 
routines  we  have  given  an  approximate  execution  time.  The  execution  time  of  pro- 
grams involving  many  branches  will  obviously  depend  on  which  path  the  computer 
follows  in  a  particular  case.  This  is  further  complicated  for  the  Z80  because  condi- 
tional jump  instructions  themselves  require  different  numbers  of  clock  cycles  depend- 
ing on  whether  the  branch  is  taken.  Thus,  a  precise  execution  time  is  often  impossible 
to  define.  The  documentation  always  contains  at  least  one  typical  example  showing  an 
approximate  or  maximum  execution  time. 

Although  we  have  drawn  examples  from  CP/  M-based  systems,  we  have  not  made 
our  routines  compatible  with  the  8080  or  8085  processors.  Readers  who  need  routines 
that  can  run  on  any  of  these  processors  should  refer  to  the  8080/8085  version  of  this 
book.  We  have  considered  the  Z80  as  an  independent  processor  and  have  taken 
advantage  of  such  features  as  block  moves,  block  compares,  loop  control  instructions, 
and  relative  jumps. 

Our  philosophy  on  error  indicators  and  special  cases  has  been  the  following: 

1.  Routines  should  provide  an  easily  tested  indicator  (such  as  the  Carry  flag)  of 
whether  any  errors  or  exceptions  have  occurred. 

2.  Trivial  cases,  such  as  no  elements  in  an  array  or  strings  of  zero  length,  should 
result  in  immediate  exits  with  minimal  effect  on  the  underlying  data. 

3.  Incorrectly  specified  data  (such  as  a  maximum  string  length  of  zero  or  an  index 
beyond  the  end  of  an  array)  should  resuh  in  immediate  exits  with  minimal  effect  on  the 
underlying  data. 

4.  The  documentation  should  include  a  summary  of  errors  and  exceptions  (under 
the  heading  of  "Special  Cases"). 

5.  Exceptions  that  may  actually  be  convenient  for  the  user  (such  as  deleting  more 
characters  than  could  possibly  be  left  in  a  string  rather  than  counting  the  precise 
number)  should  be  handled  in  a  reasonable  way,  but  should  still  be  indicated  as  errors. 

Obviously,  no  method  of  handling  errors  or  exceptions  can  ever  be  completely 
consistent  or  well-suited  to  all  applications.  And  rather  than  assume  that  the  user  will 
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always  provide  data  in  the  proper  form,  we  believe  a  reasonable  set  of  subroutines 
must  deal  with  this  issue. 

The  subroutines  are  listed  as  follows: 


Code  Conversion 

4A  Binary  to  BCD  Conversion  167 

4B  BCD  to  Binary  Conversion  170 

4C  Binary  to  Hexadecimal  ASCII  Conversion  172 

4D  Hexadecimal  ASCII  to  Binary  Conversion  175 

4E  Conversion  of  a  Binary  Number  to  Decimal  ASCII  178 

4F  Conversion  of  ASCII  Decimal  to  Binary  183 

4G  Lower-Case  to  Upper-Case  Translation  187 

4H  ASCn  to  EBCDIC  Conversion  189 

41  EBCDIC  to  ASCII  Conversion  192 


Array  Mantpulafion  and  Indexing 

5  A  Memory  Fill  195 

5B  Block  Move  198 

5C  Two-Dimensional  Byte  Array  Indexing  201 

5D  Two-Dimensional  Word  Array  Indexing  205 

5E  N-Dimensional  Array  Indexing  209 


Arithmetic 

6A  16-Bit  Multiplication  217 

6B  16-Bit  Division  220 

6C  16-Bit  Comparison  225 

6D  Multiple-Precision  Binary  Addition  228 

6E  Multiple-Precision  Binary  Subtraction  231 

6F  Multiple-Precision  Binary  Multiplication  234 

6G  Multiple-Precision  Binary  Division  239 
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6H  Multiple-Precision  Binary  Comparison  245 

61  Multiple-Precision  Decimal  Addition  248 

6J  Multiple-Precision  Decimal  Subtraction  251 

6K  Multiple-Precision  Decimal  Multiplication  254 

6L  Multiple-Precision  Decimal  Division  260 

6M  Multiple-Precision  Decimal  Comparison  266 

Bit  Manipulations  and  Shifts 

7A  Bit  Field  Extraction  267 

7B  Bit  Field  Insertion  270 

7C  Multiple-Precision  Arithmetic  Shift  Right  273 

7D  Multiple-Precision  Logical  Shift  Left  276 

7E  Multiple-Precision  Logical  Shift  Right  279 

7F  Multiple-Precision  Rotate  Right  282 

7G  Multiple-Precision  Rotate  Left  285 

Siring  IVIanipulation 

8A  String  Compare  288 

8B  String  Concatenation  292 

8C  Find  the  Position  of  a  Substring  297 

8D  Copy  a  Substring  from  a  String  302 

8E  Delete  a  Substring  from  a  String  308 

8F  Insert  a  Substring  into  a  String  313 

Array  Operations 

9 A  8-Bit  Array  Summation  319 

9B  16-Bit  Array  Summation  322 

9C  Find  Maximum  Byte-Length  Element  325 

9D  Find  Minimum  Byte-Length  Element  328 

9E  Binary  Search  331 
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9F  Quicksort  336 

9G  RAM  Test  347 

9H  Jump  Table  352 

Input/Output 

lOA  Read  a  Line  from  a  Terminal  356 

lOB  Write  a  Line  to  an  Output  Device  365 

IOC  CRC-16  Checking  and  Generation  368 

lOD  I/O  Device  Table  Handler  373 

lOE  Initialize  I/O  Ports  385 

lOF  Delay  Milliseconds  391 

Interrupts 

1 1 A  Unbuffered  Input/ Output  Using  an  SIO  394 

1 1 B  Unbuffered  Input /  Output  Using  a  PIO  404 

lie  Buffered  Input/Output  Using  an  SIO  413 

1 1 D  Real-Time  Clock  and  Calendar  425 


Binary  to  BCD  Conversion  (BN2BCD) 


4A 


Converts  one  byte  of  binary  data  to  two  bytes 
of  BCD  data. 

Procedure:  The  program  subtracts  100  repeat- 
edly from  the  original  data  to  determine  the 
hundreds  digit,  then  subtracts  10  repeatedly 
from  the  remainder  to  determine  the  tens  digit, 
and  finally  shifts  the  tens  digit  left  four  positions 
and  combines  it  with  the  ones  digit. 


Registers  Used:  AF,  C,  HL 

Execution  Time:  497  cycles  maximum;  depends  on 
the  number  of  subtractions  required  to  determine  the 
tens  and  hundreds  digits 

Program  Size:  27  bytes 

Data  Memory  Required:  None 


Entry  Conditions 

Binary  data  in  A 


Exit  Conditions 

Hundreds  digit  in  H 
Tens  and  ones  digits  in  L 


Exampies 


1.     Data:      (A)  =  6E|(,  (110  decimal) 

Result:       (H)  =  01  |j  (hundreds  digit) 

(L)  =  10|^  (tens  and  ones  digits) 


Data:       (A)  =  67,^  ( 183  decimal) 

Result:       (H)  =  01 ,6  (hundreds  digit) 

(L)  =  83, f,  (tens  and  ones  digits) 


Title  Binary  to  BCD  conversion 

Name :  BN2BC.D 


Purpose:  Convert  one  byte  of  binary  data  to  twc 

bytes  of  BCD  data 

Entry:  Register  A  =  binary  data 

Exit:  Register  H  =  Higli  byte  of  BCD  data 

Register  L  =  Low    byte  of  BCD  data 


Registers  used:  AF,C,HL 
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BN2BCD: 


DIOOLP; 


DIOLP: 


Time;  497  cycles  maximum 

Size:  Program  27  bytes 


; CALCULATE  lOO'S  DIGIT  -  DIVIDE  BY  100 
;   H  =  QUOTIENT 
;   A  =  REMAINDER 


LD  H,OFFH 

; START  QUOTIENT  AT  -1 

INC  H 

fADD  1  TO  QUOTIENT 

SUE           1 00 

; SUBTRACT  100 

JR            NC,  DIOOLP 

sJUMP  IF  DIFFERENCE  STILL 

ADD          A, 100 

fADD  THE  LAST  100  BACK 

; CALCULATE  lO'S  AND 

1 

'S  DIGITS 

;     DIVIDE  REMAINDER 

OF  THE  lOO'S  DIGIT  BY  10 

!   L  =  lO'S  DIGIT 

;   A  =  1  "S  DIGIT 

LD  L,OFFH 

; START  QUOTIENT  AT  -1 

INC  L 

;ADD  1  TO  QUOTIENT 

SUB           1 0 

: SUBTRACT  10 

JR            NC, DIOLP 

tJUMP  IF  DIFFERENCE  STILL 

ADD          A, 10 

;ADD  THE  LAST  10  BACK 

(COMBINE  1-S  AND  10 

DIGITS 

LD  C,A 

;SAVE  I'S  DIGIT  IN  C 

LD  A,L 

RLCA  ;MOVE  lO'S  TO  HIGH  NIBBLE  OF  A 

RLCA 

RLCA 

RLCA 

OR  C  ;0R  IN  THE  I'S  DIGIT 

! RETURN  WITH  L  =  LOW  BYTE,   H  =  HIGH  BYTE 

LD  L,  A 

RET 


SAMPLE  EXECUTION: 


SC4A: 

; CONVERT  OA  HEXADECIMAL  TO  10  BCD 
LD  A,OAH 

CALL        BN2BCD  sH  =  0,   L  =  lOH 


; CONVERT  FF  HEXADECIMAL  TO  255  BCD 
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LD  A,OFFH 

CALL  BN2BCD  ;H  =  02H,   L  =  55H 

! CONVERT  0  HEXADECIMAL  TO  0  BCD 

LD  A,0 

CALL  BN2ECD  ;H  =  0,   L  =  0 

JR  SC4A 

END 


BCD  to  Binary  Conversion  (BCD2BN) 


4B 


Converts  one  byte  of  BCD  data  to  one  byte 
of  binary  data. 

Procedure:  The  program  masks  off  the  more 
significant  digit,  multiphes  it  by  10  using  shifts 
(10=8+2,  and  multiplying  by  8  or  by  2  is  equiv- 
alent to  three  or  one  left  shifts,  respectively). 
Then  the  program  adds  the  product  to  the  less 
significant  digit. 


Registers  Used:  AF,  BC 
Execution  Time:  60  cycles 
Program  Size:  14  bytes 
Data  IVIemory  IJequired:  None 


Entry  Conditions 


BCD  data  in  A 


Exit  Conditions 

Binary  data  in  A 


Examples 


1.     Data:       (A)  =  99,5  2.     Data:       (A)  =  23,5 

Result:       (A)  =  63|(,  =  99,0  Result:       (A)  =  17,(,  =  23,0 


Title  BCD  to  binary  conversion 

Names  BCD2BN 


Purposes  Convert  one  byte  of  BCD  data  to  one 

byte  of  binary  data 

Entrys  Register  A  =  BCD  data 

Exits  Register  A  =  Binary  data 

Registers  useds  A,B,C,F 

Times  60  cycles 
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Size: 


Program  14  bytes 


ECD2EN: 

; MULTIPLY  UPPER  NIBBLE  BY  10  AND  SAVE  IT 

;   UPPER  NIBBLE  «  10  =  UPPER  NIBBLE  «   (8  +  2) 


LD 

B,  A 

;SAVE  ORIGINAL  BCD  VALUE  IN 

AND 

OFOH 

jMASK  OFF  UPPER  NIBBLE 

RRCA 

; SHIFT  RIGHT  1  BIT 

LD 

C,A 

;C  =  UPPER  NIBBLE  »  3 

RRCA 

; SHIFT  RIGHT  2  MORE  TIMES 

RRCA 

;A  =  UPPER  NIBBLE  «  2 

ADD 

A,C 

LD 

C,A 

;C  =  UPPER  NIBBLE  »  (.8+2) 

;GET 

LOWER  NIBBLE  AND 

ADD  IT  TO  THE 

;   BINARY  EQUIVALENT  OF 

THE  UPPER  NIBBLE 

LD 

A,B 

;GET  ORIGINAL  VALUE  BACK 

AND 

OFH 

;MASK  OFF  UPPER  NIBBLE 

ADD 

A,C 

;ADD  TO  BINARY  UPPER  NIBBLE 

RET 


SAMPLE  EXECUTION: 


; CONVERT  0  BCD  TO  0  HEXADECIMAL 
LD  A,0 

CALL        BCD2BN  ;A  =  OH 

; CONVERT  99  BCD  TO  63  HEXADECIMAL 
LD  A,099H 

CALL        BCD2EN  ; A=63H 

; CONVERT  23  BCD  TO  17  HEXADECIMAL 
LD  A,23H 

CALL        BCD2EN  !A=17H 
JR  SC4B 


END 


Binary  to  Hexadecimal  ASCII 
Conversion  (BN2HEX) 


4C 


Converts  one  byte  of  binary  data  to  two 
ASCII  characters  corresponding  to  the  two 
hexadecimal  digits. 

Procedure:  The  program  masks  off  each  hexa- 
decimal digit  separately  and  converts  it  to  its 
ASCII  equivalent.  This  involves  a  simple  addi- 
tion of  30 16  if  the  digit  is  decimal.  If  the  digit  is 
non-decimal,  an  additional  7  must  be  added  to 


Registers  Used:  AF,  B,  HL. 

Execution  Time:  162  cycles  plus  two  extra  cycles  for 
each  non-decimal  digit 

Program  Size:  28  bytes 

Data  Memory  Required:  None 

account  for  the  break  between  ASCII  9  (39  ig) 
and  ASCII  A  (41  le). 


Entry  Conditions  Exit  Conditions 

Binary  data  in  A  ASCII  version  of  more  significant  hexadecimal 

digit  in  H 

ASCII  version  of  less  significant  hexadecimal 
digit  in  L 


Examples 


1.     Data:       (A)  =  FB,,; 

Result:       (H)  =  46,^  (ASCII  F) 
(L)  =  42,6  (ASCII  B) 


Data:       (A)  =  59,(, 

Result:       (H)  =  35,6  (ASCII  5) 
(L)  =  39,6  (ASCII  9) 


Title  Binary  to  hex  ASCII 

Name:  EN2HEX 


Purpose:  Convert  one  byte  of  binary  data  to 

two  ASCII  characters 

Entry:  Register  A  =  Binary  data 
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Exit: 


Register  H 
Register  L 


ASCII  more  significant  digit 
ASCII  less  significant  digit 


Registers  used:  AF,B,HU 

Time:  Approximately  162  cycles 

Size:  Program  28  bytes 


EN2HEX : 


; CONVERT  HIGH  NIBBLE 


LD 

AND 

RRCA 

RRCA 

RRCA 

RRCA 

CALL 

LD 


B,  A 
OFOH 


N ASCI  I 
H,  A 


! CONVERT  LOW  NIBBLE 


LD 

AND 

CALL 

LD 

RET 


A,B 
OFH 
NASCII 
L,A 


jSAVE  ORIGINAL  BINARY  VALUE 
;GET  HIGH  NIBBLE 

;MOVE  HIGH  NIBBLE  TO  LOW  NIBBLE 


; CONVERT  HIGH  NIBBLE  TO  ASCII 
; RETURN  HIGH  NIBBLE  IN  H 


GET  LOW  NIBBLE 

CONVERT  LOW  NIBBLE  TO  ASCII 

RETURN  LOW  NIBBLE  IN  L 


NASCIIi 


NASI: 


SUBROUTINE  ASCII 

PURPOSE:       CONVERT  A  HEXADECIMAL  DIGIT  TO  ASCII 
ENTRY:   A  =  BINARY  DATA  IN  LOWER  NIBBLE 
EXIT:     A  =  ASCII  CHARACTER 
REGISTERS  USED:  A,F 


CP 
JR 
ADD 


ADD 
RET 


10 

CNASl 
A, 7 


A,  'O' 


JUMP  IF  HIGH  NIBBLE  <  10 
ELSE  ADD  7  SO  AFTER  ADDING   'O'  THE 
CHARACTER  WILL  EE  IN  ■A'-.-F' 

;ADD  ASCII  0  TO  MAKE  A  CHARACTER 


SAMPLE  EXECUTION: 


SC4C: 


; CONVERT  0  TO  '00' 
LD  A,0 
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CALL        BN2HEX  ;  H=-'0  '=30H,   L=  '0  '=30H 

; CONVERT  FF  HEX  TO  'FF' 
LD  A,OFFH 

CALL        BN2HEX  ;H='F'=46H,  L='F'=46H 

J  CONVERT  23  HEX  TO   '23 ' 
LD  A,23H 

CALL  BN2HEX  ;H='2'=32H,  L=-'3'=33H 
JR  SC4C 


END 


Hexadecimal  ASCII  to  Binary 
Conversion  (HEX2BN) 


4D 


Converts  two  ASCII  characters  (represent- 
ing two  hexadecimal  digits)  to  one  byte  of 
binary  data. 

Procedure:  The  program  converts  each  ASCII 
character  separately  to  a  hexadecimal  digit.  This 
involves  a  simple  subtraction  of  30 le  (ASCII  0) 
if  the  digit  is  decimal.  If  the  digit  is  non-decimal, 
another  7  must  be  subtracted  to  account  for  the 
break  between  ASCII  9  (39  le)  and  ASCII  A 
(41 16).  The  program  then  shifts  the  more  signif- 
icant digit  left  four  bits  and  combines  it  with  the 


Registers  Used:  AF,  B 

Execution  Time:  148  cycles  plus  two  extra  cycles  for 
each  non-decimal  digit 

Program  Size:  24  bytes 

Data  Memory  Required:  None 


less  significant  digit.  The  program  does  not 
check  the  validity  of  the  ASCII  characters  (that 
is,  whether  they  are  indeed  the  ASCII  represen- 
tations of  hexadecimal  digits). 


Entry  Conditions  Exit  Conditions 

More  significant  ASCII  digit  in  H,  less  signifi-    Binary  data  in  A 
cant  ASCII  digit  in  L 


Exampies 


Data:       (H)  =  44,(,  (ASCII  D) 
(L)  =  37,6  (ASCII  7) 

Result:       (A)  =  07,6 


Data: 


(H)  = 
{L)  = 


31,6  (ASCII  ') 
42,6  (ASCII  B) 


Result:       (A)  =  IB,, 


Title  Hex  ASCII  to  binary 

Name:  HEX2BN 


Purpose:  Convert   two  ASCII  characters  to  one 

byte  of  binary  data 

Entry:  Register  H  =  ASCII  more  significant  digit 
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Register  L  =  ASCII  less  significant  digit 
Exit:  Register  A  =  Binary  data 

Registers  used:  AF,B 


Time; 
Size: 


Approximately  14S  cycles 
Program  24  bytes 


HEX2BN: 


LD 

CALL 

LD 

LD 

CALL 

RRCA 

RRCA 

RRCA 

RRCA 

OR 

RET 


A,  L 
A2HEX 

B,  A 
A,H 
A2HEX 


;GET  LOW  CHARACTER 

; CONVERT  IT  TO  HEXADECIMAL 

;SAVE  HEX  VALUE  IN  B 

J  GET  HIGH  CHARACTER 

; CONVERT  IT  TO  HEXADECIMAL 

; SHIFT  HEX  VALUE  TO  UPPER  4  BITS 


;0R  IN  LOW  HEX  VALUE 


SUBROUTINE:  A2HEX 

PURPOSE:   CONVERT  ASCII  DIGIT  TO  A  HEX  DIGIT 
ENTRY:   A  =  ASCII  HEXADECIMAL  DIGIT 
EXIT:     A  =  BINARY  VALUE  OF  ASCII  DIGIT 

REGISTERS  USED:  A,F 


A2HEX: 


A2HEX1: 


SUB 
CP 
JR 
SUB 

RET 


'0  ■ 
10 

C,A2HEX1 
7 


; SUBTRACT  ASCII  OFFSET 

; BRANCH  IF  A  IS  A  DECIMAL  DIGIT 
;ELSE  SUBTRACT  OFFSET  FOR  LETTERS 


SAMPLE  EXECUTION: 


SC4D: 

; CONVERT  'C7'  TO  C7  HEXADECIMAL 
LD  H, 'C' 

LD  L,'7" 

CALL        HEX2BN  ; A=C7H 

[CONVERT  ■'2F-'  TO  2F  HEXADECIMAL 
LD  H,'2' 
LD  L,-'F' 
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CALL        HEX2BN  ; A=2FH 

J  CONVERT   'aA  '  TO  2A  HEXADECIMAL 
LD  H,'2-- 
LD  L.'A' 

CALL        HEX2EN  ; A=2AH 

JR  SC4D 


END 


Conversion  of  a  Binary  Number  to 

Decimal  ASCII  (BN2DEC)  4E 


Converts  a  16-bit  signed  binary  number  into 
an  ASCII  string.  The  string  consists  of  the 
length  of  the  number  in  bytes,  an  ASCII  minus 
sign  (if  needed),  and  the  ASCII  digits.  Note  that 
the  length  is  a  binary  number,  not  an  ASCII 
number. 

Procedure:  The  program  takes  the  absolute 
value  of  the  number  if  it  is  negative.  The  program 
then  keeps  dividing  the  absolute  value  by  10 
until  the  quotient  becomes  0.  It  converts  each 
digit  of  the  quotient  to  ASCII  by  adding  ASCII  0 
and  concatenates  the  digits  along  with  an  ASCII 


Registers  Used:  AF,  BC,  de,  hl 
Execution  Time:  Approximately  7200  cycles 
Program  Size:  107  bytes 

Data  Memory  Required:  Four  bytes  anywhere  in 
memory  for  the  buffer  pointer  (two  bytes  starting  at 
address  BUFPTR),  the  length  of  the  buffer(one  byte 
at  address  CURLEN),  and  the  sign  of  the  original 
value  (one  byte  at  address  NGFLAG).  This  data 
memory  does  not  include  the  output  buffer  which 
should  be  seven  bytes  long. 


minus  sign  (in  front)  if  the  original  number  was 
negative. 


Entry  Conditions 

Base  address  of  output  buffer  in  HL 
Value  to  convert  in  DE 


Exit  Conditions 

Order  in  buffer: 

Length  of  the  string  in  bytes  (a  binary  number) 
ASCII  ^  (if  original  number  was  negative) 
ASCII  digits  (most  significant  digit  first) 


Examples 


1.     Data:     Value  to  convert  =  3EB7||; 

Result  (in  output  buffer): 

05  (number  of  bytes  in  buffer) 

31  (ASCII  1) 

36  (ASCII  6) 

30  (ASCII  0) 

35  (ASCII  5) 

35  (ASCII  5) 

That  is,  3EB7,6  =  16055,0 


Data: 


Value  to  convert  =  FFC81, 


Result  (in  output  buffer): 

03  (number  of  bytes  in  buffer) 
2D  (ASCII  -) 

35  (ASCII  5) 

36  (ASCII  6) 

That  is,  FFCSjj  =  — 56|o,  when  considered  as  a 
signed  two's  complement  number 
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BN2DEC: 


CNVERT: 


Title  Binary  to  decimal  ASCII 

Name:  EN2DEC 


Purpose;  Convert  a  16-bit   signed  binary  number 

to  ASCII  data 

Entry:  Register  H  =  High  byte  of  output  buffer  address 

Register  L  =  Low  byte  of  output  buffer  address 
Register  D  =  High  byte  of  value  to  convert 
Register  E  =  Low  byte  of  value  to  convert 

Exit:  The  first  byte  of  the  buffer  is  the  length, 

followed  by  the  characters. 

Registers  used:.  AF,BC,DE,HL 

Time:  Approximately  7,200  cycles 

Sizes  Program  107  bytes 

Data  4  bytes 


jSAVE  PARAMETERS 

LD  (BLFPTR.)  ,HL           ; STORE  THE  BUFFER  POINTER 

EX  DE,HL 

LD  A,0 

LD  (CURLEN),A             j CURRENT  BUFFER  LENGTH  IS  0 

LD  A,H 

LD  (NGFLAG),A             ; SAVE  SIGN  OF  VALUE 

OR  A                              ;SET  FLAGS  FROM  VALUE 

JP  P, CNVERT                ;JUMP  IF  VALUE  IS  POSITIVE 

EX  DE,HL                      jELSE  TAKE  ABSOLUTE  VALUE  (0  -  VALUE) 

LD  HL,0 

OR  A                              ; CLEAR  CARRY 

SBC  HL,DE                      ! SUBTRACT  VALUE  FROM  0 

; CONVERT  VALUE  TO  A  STRING 

;HL  :=  HL  DIV  10  (DIVIDEND, QUOTIENT) 

;DE  :=  HL  MOD  10  (REMAINDER) 

LD  E,0  ; REMAINDER  =  0 

LD  B,16  ;16  BITS  IN  DIVIDEND 

OR  A  ; CLEAR  CARRY  TO  START 


DVLOOP! 


; SHIFT  THE  NEXT  BIT  OF  THE  QUOTIENT  INTO  BIT  0  OF  THE  DIVIDEND 
;  SHIFT  NEXT  MOST  SIGNIFICANT  BIT  OF  DIVIDEr-iD  INTO 
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LEAST  SIGNIFICANT  BIT  OF  REMAINDER 
HL  HOLDS  BOTH  DIVIDEND  AND  QUOTIENT.   QUOTIENT  IS  SHIFTED 

IN  AS  THE  DIVIDEND  IS  SHIFTED  OUT. 
E  IS  THE  REMAINDER. 

!D0  A  24-EIT  SHIFT  LEFT,  SHIFTING 
;     CARRY  TO  L,   L  TO  H,   H  TO  E 


RL 
RL 
RL 


L 
H 
E 


CARRY   (NEXT  BIT  OF  QUOTIENT.)   TO  BIT  0 

SHIFT  HIGH  BYTE 

SHIFT  NEXT  BIT  OF  DIVIDEND 


;IF  REMAINDER  IS  10  OR  MORE,   NEXT  BIT  OF 

;     QUOTIENT  IS  1    (THIS  BIT  IS  PLACED  IN  CARRY.) 


LD 

SUB 

CCF 

JR 
LD 


A,E 
10 


NC, DECCNT 
E,A 


SUBTRACT  10  FROM  REMAINDER 
COMPLEMENT  CARRY 

(THIS  IS  NEXT  BIT  OF  QUOTIENT.) 
JUMP  IF  REMAINDER  IS  LESS  THAN  10 
OTHERWISE  REMAINDER  =  DIFFERENCE 

BETWEEN  PREVIOUS  REMAINDER  AND  10 


DECCNT : 


CHINS: 


DJNZ 


DVLOOP 


; CONTINUE  UNTIL  ALL  BITS  ARE  DONE 


; SHIFT  LAST  CARRY  INTO  QUOTIENT 

RL  L  jLAST  BIT  OF  QUOTIENT  TO  BIT  0 

RL  H 


; INSERT  THE  NEXT  CHARACTER  IN  ASCII 

; CONVERT  0...9  TO  ASCII 


LD 
ADD 
CALL 


A,E 
A,  '0  ' 
INSERT 


'0'.. , 


J  IF  QUOTIENT  IS  NOT  0  THEN  KEEP  DIVIDING 


LD 

OR 
JR 


A,H 
L 

NZ , CNVERT 


EXIT: 


POS: 


LD 
OR 
JP 
LD 

CALL 


RET 


A,  (NGFLAG.) 
A 

P.POS 
A, 

INSERT 


; BRANCH  IF  ORIGINAL  VALUE  WAS  POSITIVE 
;  ELSE 

;   PUT  A  MINUS  SIGN  IN  FRONT 


; RETURN 
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SUBROUTINE;  INSERT 

PURPOSE:    INSERT  THE  CHARACTER  IN  REGISTER  A  AT  THE 

FRONT  OF  THE  BUFFER 
ENTRY:   CURLEN  =  LENGTH  OF  BUFFER 

BUFPTR  =  CURRENT  ADDRESS  OF  LAST  CHARACTER  IN  BUFFER 
EXIT:     REGISTER  A  INSERTED  IMMEDIATELY  AFTER  LENGTH  BYTE 
REGISTERS  USED:  AF,B,C,D,E 


PUSH 

HL 

fSAVE  HL 

PUSH 

AF 

sSAVE  CHARACTER  TO  INSERT 

jMOVE 

ENTIRE  BUFFER  UP 

1  BYTE  IN  MEMORY 

LD 

HL, (BUFPTR) 

!GET  BUFFER  POINTER 

LD 

D,H 

;HL  =  SOURCE  (CURRENT  END  OF  BUFFER) 

LD 

E,L 

INC 

DE 

;DE  =  DESTINATION  (CURRENT  END  +  1) 

LD 

(BUFPTRKDE 

; STORE  NEW  BUFFER  POINTER 

LD 

A, (CURLEN) 

OR 

A 

jTEST  FOR  CURLEN  =  0 

JR 

ZrEXITMR 

;JUMP  IF  ZERO  (NOTHING  TO  MOVE, 

;   JUST  STORE  THE  CHARACTER) 

LD 

C,  A 

;BC  =  LOOP  COUNTER 

LD 

E,0 

LDDR 

sMOVE  ENTIRE  BUFFER  UP  1  BYTE 

EXITMR: 


LD 

INC 

LD 

LD 

EX 

POP 

LD 

POP 

RET 


A, (CURLEN) 
A 

(CURLEN) , A 
(HL) , A 
DE,HL 
AF 

(HL),A 
HL 


; INCREMENT  CURRENT  LENGTH  BY  1 


[UPDATE  LENGTH  BYTE  OF  BUFFER 

;HL  POINTS  TO  FIRST  CHARACTER  IN  BUFFER 

sGET  CHARACTER  TO  INSERT 

; INSERT  CHARACTER  AT  FRONT  OF  BUFFER 

; RESTORE  HL 


■  DATA 

BLippXR.   DS  2  J  ADDRESS  OF  LAST  CHARACTER  IN  BUFFER 

CURLEN!  DS  1  ; CURRENT  LENGTH  OF  BUFFER 

NGFLAG:   DS  1  ;SIGN  OF  ORIGINAL  VALUE 


SAMPLE  EXECUTION: 


SC4E: 


J  CONVERT  0  TO  '0  ' 
LD  HL, BUFFER 

LD  DE,0 
CALL  BN2DEC 


;HL  =  BASE  ADDRESS  OF  BUFFER 
;DE  =  0 
; CONVERT 

5   BUFFER  SHOULD  =  '0' 
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; CONVERT  32767  TO 
LD  HL, BUFFER 

LD  DE, 32767 

CALL  BN2DEC 


; CONVERT  -32768  TO 
LD  HL, BUFFER 

LD  DE, -32768 

CALL  BN2DEC 
JR  SC4E 


'32767' 

;HL  =  BASE  ADDRESS  OF  BUFFER 
;DE  =  32767 
i CONVERT 

f  BUFFER  SHOULD  =   '32767  •■ 
-32768' 

;HL  =  BASE  ADDRESS  OF  BUFFER 
jDE  =  -32768 
; CONVERT 

5   BUFFER  SHOULD  =  ' -32768' 


BUFFER:  DS 
END 


;7-BYTE  BUFFER 


Conversion  of  ASCII  Decimal  to 
Binary  (DEC2BN) 


4F 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  Approximately  152  cycles  per  byte 
plus  a  maximum  of  186  cycles  overhead 

Program  Size:  79  bytes 

Data  Memory  Required:  One  byte  anywhere  in 
RAM  (address  NGFLAG)  for  a  flag  indicating  the 
sign  of  the  number 

Special  Cases: 

1 .  If  the  string  contains  something  other  than  a 
leading  sign  or  a  decimal  digit,  the  program  returns 
with  the  Carry  flag  set  to  1.  The  result  in  HL  is 
invalid. 

2.  If  the  string  contains  only  a  leading  sign 
(ASCII  +  or  ASCII  the  program  returns  with 
the  Carry  flag  set  to  I  and  a  result  of  0. 


Converts  an  ASCII  string  consisting  of  the 
length  of  the  number  (in  bytes),  a  possible 
ASCII  —  or  +  sign,  and  a  series  of  ASCII  digits 
to  two  bytes  of  binary  data.  Note  that  the  length 
is  an  ordinary  binary  number,  not  an  ASCII 
number 

Procedure:  The  program  sets  a  flag  if  the  first . 
ASCII  character  is  a  minus  sign  and  skips  over  a 
leading  plus  sign.  It  then  converts  each  subse- 
quent digit  to  decimal  by  subtracting  ASCII  0, 
multiplies  the  previous  digits  by  10  (using  the 
fact  that  10  =  8  +  2,  so  a  multiplication  by  10  can 
be  reduced  to  left  shifts  and  additions),  and  adds 
the  new  digit  to  the  product.  Finally,  the  pro- 
gram subtracts  the  result  from  0  if  the  original 
number  was  negative.  The  program  exits  imme- 
diately, setting  the  Carry  flag,  if  it  finds  some- 


thing other  than  a  leading  sign  or  a  decimal  digit 
in  the  string. 


Entry  Conditions 


Exit  Conditions 


Base  address  of  string  in  HL 


Binary  value  in  HL 

Carry  flag  is  0  if  the  string  was  valid;  Carry  flag 
is  1  if  the  string  contained  an  invalid  charac- 
ter 

Note  that  the  result  is  a  signed  two's  complement 
16-bit  number 


Examples 


1 .     Data:       String  consists  of 

04  (number  of  bytes  in  string) 

31  (ASCII  1) 

32  (ASCII  2) 

33  (ASCII  3) 

34  (ASCII  4) 

That  is,  the  number  is  +1,234|q 


Result:      (H)  =  04,^  (more  significant  byte  of  binary 
data) 

(L)  =  D2|5  (less  significant  byte  of  binary 
data) 

That  is,  the  number  + 1 ,234,0  =  04D2|e 
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Data:       String  consists  of 

06  (number  of  bytes  in  string) 

2D  (ASCII  -) 

33  (ASCII  3) 

32  (ASCII  2) 

37  (ASCII  7) 

35  (ASCII  5) 

30  (ASCII  0) 

That  is,  the  number  is  — 32,750,q 


Result:     (H)  =  80|j  (more  significant  byte  of  binary 
data) 

(L)  =  12|5  (less  significant  byte  of  binary 
data) 


Title 
Name : 


Decimal  ASCII  to  binary 
DEC2BN 


DEC2EN: 


Purpose: 

Entry: 
Exi  t : 


Convert  ASCII  characters  to  two  bytes  of  binary 
data 

HL  =  Base  address  of  input  buffer 

HL  =  Binary  value 
if  no  errors  then 

Carry  =  0 
else 

Carry  =  1 


Registers  used:  AF,EC,DE,HL 


Times 


Size: 


Approximately  152  cycles  per  byte  plus 
a  maximum  of   186  cycles  overhead 

Program    79  bytes 
Data  1  byte 


; INITIALIZE  -  SAVE  LENGTH,   CLEAR  SIGN  AND  VALUE 

LD  A, (HL)  ;SAVE  LENGTH  IN  E 

LD  B,  A 

INC  HL  ; POINT  TO  BYTE  AFTER  LENGTH 

SUB  A 

LD  (NGFLAG.),A  ;  ASSUME  NUMBER  IS  POSITIVE 

LD  DE,0  ; START  WITH  VALUE  =  0 


; CHECK  FOR  EMPTY  BUFFER 

OR  B  ; IS  BUFFER  LENGTH  ZERO? 
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INITli 


JR  Z,EREXIT  SYES,   EXIT  WITH  VALUE  =  0 

! CHECK  FOR  MINUS  OR  PLUS  SIGN  IN  FRONT 

LD  A, (HL)  ; GET  FIRST  CHARACTER 

CP  ;IS  IT  A  MINUS  SIGN? 

JR  NZ,PLUS  (NO,  BRANCH 

LD  A,OFFH 

LD  (NGFLAG),A  ;YES,   MAKE  SIGN  OF  NUMBER  NEGATIVE 

JR  SKIP  jSKIP  OVER  MINUS  SIGN 


PLUS: 


CP  '  +  ■' 

JR  NZ,CHKDIG 

SKIP:       INC  HL 

DEC  E 

JR  ZrEREXIT 


IS  FIRST  CHARACTER  A  PLUS  SIGN? 
NO,   START  CONVERSION 
SKIP  OVER  THE  SIGN  BYTE 
DECREMENT  COUNT 

ERROR  EXIT  IF  ONLY  A  SIGN  IN  BUFFER 


;  CONVERSION  LOOP 

;   CONTINUE  UNTIL  THE  BUFFER  IS  EMPTY 
;   OR  A  NON-NUMERIC  CHARACTER  IS  FOUND 

CNVERT : 

LD  A, CHL)  ;GET  NEXT  CHARACTER 

CHKDIG:  SUB  'O' 

JR  CEREXIT  J  ERROR  IF  <    '0  '   (NOT  A  DIGIT) 

CP  9+1 

JR  NCEREXIT  ;  ERROR  IF  >  ■'9  '    (NOT  A  DIGIT) 

LD  C,A  (CHARACTER  IS  DIGIT,   SAVE  IT 

jVALID  DECIMAL  DIGIT  SO 

;     VALUE  :=  VALUE  «  10 

;       =  VALUE  K  (8  +  2) 

;       =  (VALUE  K  8)  +  (VALUE  k  2) 


PUSH 

HL 

jSAVE  BUFFER  POINTER 

EX 

DE,HL 

;HL  =  VALUE 

ADD 

HL,HL 

■   **  2 

LD 

E,L 

jSAVE  TIMES  2  IN  DE 

LD 

D,H 

ADD 

HL,HL 

;   «  4 

ADD 

HL,HL 

;   «  8 

ADD 

HL,DE 

; VALUE  =  VALUE  »  (8+2) 

;ADD  IN 

THE  NEXT 

DIGIT 

t  VALUE 

s=  VALUE 

+  DIGIT 

LD 

E,C 

jMOVE  NEXT  DIGIT  TO  E 

LD 

D,0 

!   HIGH  BYTE  IS  0 

ADD 

HL,DE 

jADD  DIGIT  TO  VALUE 

EX 

DE,HL 

fDE  =  VALUE 

POP 

HL 

; POINT  TO  NEXT  CHARACTER 

INC 

HL 

DJNZ 

CNVERT 

{CONTINUE  CONVERSION 

(CONVERSION  IS  COMPLETE,  CHECK  SIGN 
EX  DE,HL  ;HL  =  VALUE 

LD  A, (NGFLAG) 

OR  A 
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JR 
EX 
LD 
OR 
SBC 


Z,OKEXIT 
DE,HL 
HL,0 
A 

HL,DE 


;JUMP  IF  THE  VALUE  WAS  POSITIVE 
;ELSE  REPLACE  VALUE  WITH  -VALUE 

! CLEAR  CARRY 

; SUBTRACT  VALUE  FROM  0 


OKEXIT: 


EREXIT: 


EX 
SCF 
RET 

;DATA 
NGFLAG:  DS 


;N0  ERRORS,   EXIT  WITH  CARRY  CLEAR 

OR  A  ; CLEAR  CARRY 

RET 

jAN  ERROR.   EXIT  WITH  CARRY  SET 
DE,HL 


?HL  =  VALUE 
jSET  CARRY  TO  INDICATE  ERROR 


jSICN  OF  NUMBER 


SC4F: 


Si! 

S2: 
S3 1 


SAMPLE  EXECUTION: 


; CONVERT  '1234' 
LD  HL,S1 
CALL  DEC2BN 


; CONVERT  '+32767' 
LD  HL,S2 
CALL  DEC2EN 


;  CONVERT  •'-3276S' 


LD 
CALL 


JR 


DB 
DB 
DB 


HL,S3 
DEC2BN 


SC4F 

4, '1234' 
6,  +32767' 
6, '-32768' 


;HL  =  BASE  ADDRESS  OF  SI 
;H  =  04,   L  =  D2  HEX 

fHL  =  BASE  ADDRESS  OF  S2 
!H  =  7F,   L  =  FF  HEX 

;HL  =  BASE  ADDRESS  OF  S3 
jH  =  80  HEX,   L  =  00  HEX 


END 


Lower-Case  to  Upper-Case 
Translation  (LC2UC) 


4G 


Converts  an  ASCII  lower-case  letter  to  its 
upper-case  equivalent. 

Procedure:  The  program  uses  comparisons  to 
determine  whether  the  data  is  an  ASCII  lower- 
case letter.  If  it  is,  the  program  subtracts  20i6 
from  it,  thus  converting  it  to  its  upper-case  equiv- 
alent. If  it  is  not,  the  program  leaves  it  unchanged. 


Registers  Used:  AF 

Execution  Time:  45  cycles  if  tlie  original  character  is 
a  lower-case  letter,  fewer  cycles  otherwise 

Program  Size:  11  bytes 

Data  Memory  Required:  None 


Entry  Conditions  Exit  Conditions 

Character  in  A  If  an  ASCII  lower-case  letter  is  present  in  A, 

then  its  upper-case  equivalent  is  returned  in  A. 
In  all  other  cases,  A  is  unchanged. 


Examples 

2.     Data:       (A)  =  54,6  (ASCII  T) 
Result;       (A)  =  54,5  (ASCII  T) 


1,     Data:       (A)  =  62,(,  (ASCII  b) 
Result:       (A)  =  42,.  (ASCII  B) 


Title  Lower-case  to  upper-case  translation 

Name  s  LC2UC 


Purpose:  Convert  one  ASCII  ctiaracter  to  upper  case  from 

lower  case  if  necessary 

Entry;  Register  A  =  Lower-case  ASCII  cliaracter 

Exit:  Register  A  =  Upper-case  ASCII  character  if  A 

is  lower  case,  else  A  is  unchanged 

Registers  used;  AF 
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Time: 
Size: 


45  cycles  if  A  is  lower  case,    less  otherwise 

Program  11  bytes 
Data  none 


LC2UC: 


EXIT: 


CP 
JR 
CP 
JR 
SUB 

RET 


-  a- 

CEXIT 
■'z'  +  l 
NCEXIT 

•'a'-'A' 


{BRANCH  IF  <    -a'   (NOT  LOWER  CASE.) 


? BRANCH  IF  > 
J  CHANGE  'a'.. 


(NOT  LOWER  CASE.) 
into  'A'..'Z" 


SAMPLE  EXECUTION: 


SC4G: 


; CONVERT  LOWER  CASE  E  TO  UPPER  CASE 
LD  A,'e' 

CALL        LC2UC  .A='E'=45H 

; CONVERT  LOWER  CASE  Z  TO  UPPER  CASE 
LD  A,'e' 

CALL        LC2UC  jA='Z'=5AH 

; CONVERT  UPPER  CASE  A  TO  UPPER  CASE  A 
LD            A  'A' 

CALL        LC2UC  .A='A'=41H 
JR  SC4G 

END 


ASCII  to  EBCDIC  Conversion  (ASC2EB) 


4H 


Converts  an  ASCII  character  to  its  EBCDIC 
equivalent. 

Procedure:  The  program  uses  a  simple  table 
lookup  with  the  data  as  the  index  and  address 
EBCDIC  as  the  base.  A  printable  ASCII  charac- 
ter with  no  EBCDIC  equivalent  is  translated  to 
an  EBCDIC  space  (40 1^);  a  non-printable  ASCII 
character  with  no  EBCDIC  equivalent  is  trans- 
lated to  an  EBCDIC  NUL  (00]6). 


Entiy  Conditions  Exit  Conditions 

ASCII  character  in  A  EBCDIC  equivalent  in  A 


Registers  Used:  AF,  DE,  HL 
Execution  Time:  55  cycles 

Program  Size:  11  bytes,  plus  128  bytes  for  the  con- 
version table 

Data  Memory  Required:  None 


Examples 

1.  Data:       (A)  =  35,6  (ASCII  5)  3.     Data:      (A)  =  2A,e  (ASCII  *) 
Result:       (A)  =  F5,6  (EBCDIC  5)  Result:       (A)  =  5C,aEBCDIC  *) 

2.  Data:      (A)  =  77,5  (ASCII  w) 
Result:       (A)  =  A6,6  (EBCDIC  w) 


Title  ASCII  to  EBCDIC  conversion 

Name :  ASC2EE 


Purpose:  Convert  an  ASCII  character  to  its 

corresponding  EBCDIC  character 

Entry:  Register  A  =  ASCII  character 

E>!it:  Register  A  =  EBCDIC  character 
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Registers  used:  AF,DE,  HL 
Time:  55  cycles 


Size:  Program  11  bytes 

Data         128  bytes  for  the  table 


ASC2EB: 


LD 

HL, EBCDIC 

;GET  BASE  ADDRESS  OF  EBCDIC  TABLE 

AND 

OlllllllB 

;BE  SURE  BIT  7=0 

LD 

E,A 

;USE  ASCII  AS  INDEX  INTO  EBCDIC  TABLE 

LD 

D,0 

ADD 

HLrDE 

LD 

A, (HL) 

;GET  EBCDIC 

RET 

ASCII  TO  EBCDIC  TABLE 

A  PRINTABLE  ASCII  CHARACTER  WITH  NO  EBCDIC  EQUIVALENT  IS 

TRANSLATED  TO  AN  EBCDIC  SPACE  (040H) ,   A  NONPRINTABLE  ASCII  CHARACTER 

WITH  NO  EQUIVALENT  IS  TRANSLATED  TO  A  EBCDIC  NUL  (OOOH) 


EBCDIC; 


!  NUL     SOH     STX     ETX     EOT     ENQ     ACK  BEL 

DE  OOOH , 00 1 H , 002H , 003H , 037H , 02DH , 02EH , 02FH 

;  BS      HT      LF       VT      FF       CR       SO  SI 

DB  016H, 005H, 025H, OOBH, OOCH, OODH, OOEH, OOFH 

;  DLE     DCl     DC2     DCS     DC4     NAK     SYN  ETB 

DE  010H,01 1H,012H,013H,03CH,03DH,032H,026H 

;  CAN     EM      SUB     ESC     IFS     IGS     IRS     I US 

DE  018H,019H,03FH,027H,01CH,01DH,01EH,01FH 

;  SPACE   !         "         #        $        •/.  S: 

DB  040H, 05 AH, 07FH, 07BH, 05BH, 06CH, 050H, OODH 
;  ()»         +  ,_./ 

DB  04DH , 05DH , 05CH , 04EH , 06BH , 060H , 04BH , 06 1 H 
!  0         1         2        3        4        5         6  7 

DB  OFOH , OF 1 H , 0F2H , 0F3H , 0F4H , 0F5H , 0F6H , 0F7H 
!  8        9        :         ;         <        =        >  ? 

DB  0F8H,  0F9H,  07AH,  05EH,  04C:H,  07EH,  06EH,  06FH 
;  eABCDEFG 

DB  07CH, OC 1 H , 0C2H , 0C3H , 0C4H , 0C5H , 0C6H , 0C7H 
;  H         I         J        K        L        M        N  0 

DB  0C8H ,  0C9H ,  OD 1 H ,  0D2H ,  0D3H , 0D4H , 0D5H , 0D6H 
;  PQRSTUVW 

DB  0D7H, 0D8H, 0D9H, 0E2H, 0E3H, 0E4H, 0E5H, 0E6H 
;  X        Y         Z         [         \         3         '  - 

DB  0E7H , 0E8H , 0E9H ,  040H , OEOH , 040H , 040H , 06DH 
;  ■•        a        b        c        d        e        f  g 

DB  009H , 08 1 H , 082H , 0S3H , 0S4H , 0S5H , 086H , 0S7H 
;  h        i        j         k  1 

DB  088H,089H,091H,092H,093H 
;  P        q        r         s  t 

DB  097H , 098H , 099H , 0A2H , 0 ASH 
5  >!         y         z         {  1 

DB 


m  n  o 
094H,095H,096H 

U  V  w 

0A4H,0A5H,0A6H 

J         ~  DEL 


0A7H, OASH, 0A9H, OCOH, 06AH, ODOH, OAIH, 007H 
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SAMPLE  EXECUTION: 


SC4H: 

;  CONVERT  ASCII    -A-'  TO 
LD  A,'A' 
CALL  ASC2EB 

{CONVERT  ASCII    '1'  TO 
LD  A,'l' 
CALL  ASC2EB 

; CONVERT  ASCII    'a'  TO 
LD  A,'a' 
CALL  ASC2EB 


EBCDIC 

! ASCI  I    'A  ' 

; EBCDIC   'A'  =  OCIH 

EBCDIC 

; ASCI  I  '1' 

; EBCDIC  '1'  =  OFIH 

EBCDIC 

; ASCI  I    'a  ' 

; EBCDIC  'a'  =  081H 


JR  SC4H 


END 


EBCDIC  to  ASCII  Conversion  (EB2ASC)  4 


Converts  an  EBCDIC  character  to  its  ASCII 
equivalent. 

Procedure:  The  program  uses  a  simple  table 
lookup  with  the  data  as  the  index  and  address 
ASCII  as  the  base.  A  printable  EBCDIC  charac- 
ter with  no  ASCII  equivalent  is  translated  to  an 
ASCII  space  (20i6);  a  non-printable  EBCDIC 
character  with  no  ASCII  equivalent  is  trans- 
lated to  an  ASCII  NUL  (00,6). 


Registers  Used:  AF,  DE,  HL 
Execution  Time:  48  cycles 

Program  Size:  9  bytes,  plus  256  bytes  for  the  con- 
version table 

Data  H^emory  Required:  None 


Entry  Conditions  Exit  Conditions 

EBCDIC  character  in  A  ASCII  equivalent  in  A 


Examples 


1 .     Data:      ( A)  =  85   ( EBCDIC  e) 
Result:       (A)  =  65,6  (ASCII  e) 


Data:  (A)  =  4E|6  (EBCDIC  +) 
Result:       (A)  =  2B,(j  (ASCII  +) 


Title  EBCDIC  to  ASCII  conversion 

Names  EB2ASC 


Purposes  Convert  an  EBCDIC  character  to  its 

corresponding  ASCII  character 

Entrys  Register  A  =  EBCDIC  character 

Exits  Register  A  =  ASCII  character 

Registers  useds  AF,DE,HL 
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Time: 
Size; 


48  cycles 
Program  9  bytes 

Data        256  bytes  for  the  table 


EB2ASC: 


LD 

LD 

LD 

ADD 

LD 

RET 


HL, ASCII 
E,A 
D,0 
HL,De 
A, (HL) 


;GET  BASE  ADDRESS  OF  ASCII  TABLE 
;USE  EBCDIC  AS  INDEX 


;GET  ASCII  CHARACTER 


(EBCDIC  TO  ASCII  TABLE 

!   A  PRINTABLE  EBCDIC  CHARACTER  WITH  NO  ASCII  EQUIVALENT  IS 
;   TRANSLATED  TO  AN  ASCII  SPACE  (020H),   A  NONPRINTABLE  EBCDIC 
;   WITH  NO  EQUIVALENT  IS  TRANSLATED  TO  AN  ASCII  NUL  (OOOH^ 
ASCIIs 

;  NUL     SOH     STX     ETX  HT  DEL 

OOOH, OOIH, 002H, 003H, OOOH, 009H, OOOH, 07FH 

VT       FF       CR       SO  SI 
OOOH , OOOH , OOOH , OOBH , OOCH , OODH , OOEH , OOFH 
DLE     DCl     DC2     DCS  BS 
OlOH,  01 1H,012H,013H, OOOH, OOOH, OOSH, OOOH 
CAN    EM  IFS     IGS     IRS  lUS 

018H,019H, OOOH, OOOH, 01CH,01DH,01EH,01FH 

LF     ETB  ESC 
OOOH ,  OOOH , OOOH , OOOH , OOOH , OOAH , 0 1 7H , 0 1 BH 

ENQ     ACK  EEL 
OOOH, OOOH, OOOH, OOOH, OOOH, OOSH, 006H, 0O7H 

SYN  EOT 
OOOH, OOOH, 016H, OOOH, OOOH, OOOH, OOOH, 004H 

DC4     NAK  SUB 
OOOH ,  OOOH , OOOH ,  OOOH , 0 1 4H , 0 1 5H , OOOH , 0 1 AH 
SPACE 

'    '   ,  OOOH,  OOOH,  OOOH, OOOH, OOOH, OOOH, OOOH 

<         (  + 
OOOH, OOOH,  '  ■'   ,      '   ,  '<■'   ,  '(■'   ,  '  +  '   ,  ■'  ■' 


DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 


■  S< '   ,  OOOH ,  OOOH ,  OOOH ,  OOOH ,  OOOH ,  OOOH ,  OOOH 

!         *        »         )  ! 
OOOH,  OOOH,  ■'  !  '   ,  ■'$■'   ,         ,    .)  ■•   ,  ■' ;  '   ,  ■'  - 
/ 

,  '/  ■•   ,  OOOH,  OOOH, OOOH,  OOOH,  OOOH,  OOOH 
!  ,■/.->? 
OOOH,  OOOH,  •'  1  -   ,  '  ,  •'   ,  ■'■/.  -   ,         ,  ■'>■'   ,  ■'?■' 

OOOH ,  OOOH ,  OOOH ,  OOOH ,  OOOH ,  OOOH ,  OOOH ,  OOOH 

!       #      e      •'      =  " 

OOOH,  '"'  ,'!'  ,'#■'  ,'•'•'■',•'  =  •' 

a  b  c  d         e         f  g 

OOOH,  'a'  ,  'b'  ,  'c'  ,  'd-'   ,'e'  ,  'f  '  ,  'g' 
h  i 


CHARACTER 


EBCDIC 

ASCI  I 

EBCDIC 

ASCII 

EBCDIC 

ASCII 

EBCDIC 

ASC 1 1 

EBCDIC 

ASCII 

EBCDIC 

ASCI  I 

EBCDIC 

ASCII 

EBCDIC 

ASCII 

EBCDIC 

ASC  1 1 

EBCDIC 

ASCI  I 

EBCDIC 

ASC  1 1 

EBCDIC 

ASCI  I 

EBCDIC 

ASCI  I 

EBCDIC 

ASCII 

EBCDIC 

ASCII 

EBCDIC 

ASCII 

EBCDIC 

ASCII 

EBCDIC 
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DB 

•'h  ' 

,  ■'  i  •' 

, OOOH, OOOH, OOOH, OOOH, OOOH, OOOH 

ASCII 

? 

j 

k        1        m        n        o  p 

EBCDIC 

DB 

OOOH, ' j " 

,  'k  '  ,  '1'  , 'm'  ,  'n  '  ,  'o'  ,  p  ' 

ASCII 

• 

^ 

r 

EBCDIC 

DB 

,  'r  ' 

, OOOH, OOOH, OOOH, OOOH, OOOH, OOOH 

ASCII 

S            t            U            V            W  X 

EBCDIC 

DB 

OOOH, 

,  's'  ,'t'            ,'v'   ,'w',  'x' 

ASCII 

y 

z 

EBCDIC 

DB 

T  <£■ 

,  OOOH ,  OOOH ,  OOOH , OOOH , OOOH , OOOH 

ASCII 

r 

EBCDIC 

DB 

OOOH , OOOH , OOOH ,  OOOH , OOOH ,  OOOH ,  OOOH , OOOH 

ASCII 

; 

EBCDIC 

DB 

OOOH, OOOH, OOOH, OOOH, OOOH,  OOOH,  OOOH,  OOOH 

ASCII 

7 

{ 

A 

B        C        D        E        F  6 

EBCDIC 

DB 

■'{•' 

,  'A' 

, 'B'   ,'C'   ,'D'   ,'E'   ,'F'  ,'G' 

ASCII 

H 

I 

EBCDIC 

DB 

'H- 

,  •'  I  ' 

, OOOH, OOOH, OOOH, OOOH, OOOH, OOOH 

ASCI  I 

J 

J 

K        L        M        N        0  P 

EBCDIC 

DB 

■'}  ■• 

,  'J' 

,'K'   ,'L'   ,'M'   ,'N'   ,'0'  ,'P' 

ASCII 

Q 

R 

EBCDIC 

DB 

'Q' 

,  'R' 

, OOOH, OOOH, OOOH, OOOH, OOOH, OOOH 

ASCII 

\ 

S        T        U        V        W  X 

EBCDIC 

DB 

■'\' 

,000H,'S'   ,'T'   ,'U'   ,'V'   ,'W',  'X' 

ASCII 

Y 

Z 

EBCDIC 

DB 

'Y' 

,  'Z' 

, OOOH, OOOH, OOOH, OOOH, OOOH, OOOH 

ASCII 

0 

1 

2        3        4        5        6  7 

EBCDIC 

DB 

-0' 

,  '1' 

,  '2-'   ,  '3-'   ,  '4-'   ,  '5'   ,  '6''  ,•'7' 

ASCII 

9 

EBCDIC 

DB 

•'9' 

, OOOH , OOOH , OOOH , OOOH , OOOH , OOOH , OOOH 

ASCII 

SAMPLE  EXECUTION: 


SC4I: 

; CONVERT  EBCDIC  'A' 
LD  A,0C1H 
CALL  EB2ASC 

; CONVERT  EBCDIC  '1' 
LD  A.OFIH 
CALL  EB2ASC 

; CONVERT  EBCDIC  'a' 
LD  A,081H 
CALL  EB2ASC 

JR  SC4 I 

END 


TO  ASCII 

; EBCDIC  'A' 

; ASCI  I    'A'  =  041H 

TO  ASCII 

! EBCDIC  '1' 
[ASCII    '1'  =  031H 

TO  ASCII 

5  EBCDIC  'a' 

; ASCI  I    'a  '  =  061H 


Memory  Fill  (MFILL) 


5A 


Places  a  specified  value  in  each  byte  of  a  mem- 
ory area  of  known  size,  starting  at  a  given  ad- 
dress. 

Procedure:  The  program  stores  the  specified 
value  in  the  first  byte  and  then  uses  a  block  move 
to  fill  the  remaining  bytes.  The  block  move 
simply  transfers  the  value  a  byte  ahead  during 
each  iteration. 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  Approximately  21  cycles  per  byte 
plus  50  cycles  overhead 

Program  Size:  11  bytes 

Data  Memory  Required:  None 

Special  Cases: 

1.  A  size  of 0000|(j  is  interpreted  as  lOOOOi^.  It  there- 
fore causes  the  program  to  fill  65,536  bytes  with 
the  specified  value. 

2.  Filling  areas  occupied  or  used  by  the  program 
itself  will  cause  unpredictable  results.  Obviously, 
filling  the  stack  area  requires  special  caution, 
since  the  return  address  is  saved  there. 


Entry  Conditions 

Starting  address  of  memory  area  in  HL 
Area  size  (number  of  bytes)  in  BC 
Value  to  be  placed  in  memory  in  A 


Exit  Conditions 

The  area  from  the  base  address  through  the 
number  of  bytes  given  by  the  area  size  is  filled 
with  the  specified  value.  The  area  thus  filled 
starts  at  BASE  and  continues  through  BASE  + 
SIZE  -  1  (BASE  is  the  base  address  and  SIZE  is 
the  area  size). 


Examples 


1.     Data:     Value  =  FF,, 


Result: 


Area  size  (in  bytes)  =  0380|j 
Base  address  =  lAEO|j 

FFjg  placed  in  addresses  lAEO]^  through 
1E5F„ 


2.  Data: 


Result: 


Value  =  00,j  (Z80  operation  code  for  NOP) 
Area  size  (in  bytes)  =  1C65|5 
Base  address  =  E34C]5 

00|j  placed  in  addresses  E34C|5  through 
FFBO.e 
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MFILLs 


Title  Memory  fill 

Name:  MFILL 


Purpose:  Fill  an  area  of  memory  with  a  value 

Entry:  Register  H  =  High  byte  of  base  address 

Register  L  =  Low  byte  of  base  address 
Register  B  =  High  byte  of  area  size 
Register  C  =  Low  byte  of  area  size 
Register  A  =  Value  to  be  placed  in  memory 

Note:  A  size  of  0  is  interpreted  as  65536 

Exit:  Area  filled  with  value 

Registers  used:  AF,BC,DE,HL 

Time:  Approximately  21  cycles  per  byte  plus 

50  cycles  overhead 

Size:  Program  11  bytes 

Data  None 


LD  (HL),A  J  FILL  FIRST  BYTE  WITH  VALUE 

LD  D,H  ! DESTINATION  PTR  =  SOURCE  PTR  +  1 

LD  E,L 

INC  DE 

DEC  BC  f ELIMINATE  FIRST  BYTE  FROM  COUNT 

LD  A,B  J  ARE  THERE  MORE  BYTES  TO  FILL? 

OR  C 

RET  Z  fNO,   RETURN  -  SIZE  WAS  1 

LDIR  jYES,   USE  BLOCK  MOVE  TO  FILL  REST 

;   BY  MOVING  VALUE  AHEAD  1  BYTE 

RET 


SAMPLE  EXECUTION: 


SC5A: 

jFILL  EFl  THROUGH  BFl+15  WITH  00 

LD  HLrBFl  ! STARTING  ADDRESS 

LD  BCSIZEl  ;  NUMBER  OF  BYTES 
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LD  A,0 
CALL  MFILL 

J  FILL  BF2  THROUGH  BF2+ 


LD 

HL,BF2 

LD 

BC,SIZE2 

LD 

A,OFFH 

CALL 

MFILL 

JR 

SC5A 

SIZEl 

EGU 

16 

SIZE2 

EQU 

2000 

BFls 

DS 

SIZEl 

BF2: 

DS 

SIZE2 

; VALUE  TO  FILL 
;FILL  MEMORY 

1999  WITH  FF 

."STARTING  ADDRESS 
; NUMBER  OF  BYTES 
J  VALUE  TO  FILL 
;FILL  MEMORY 


jSIZE  OF  BUFFER  I   (10  HEX) 
J  SIZE  OF  BUFFER  2  t07D0  HEX) 


END 


Block  Move'(BLKMOV) 


5B 


Moves  a  block  of  data  from  a  source  area  to 
a  destination  area. 

Procedure:  The  program  determines  if  the 
base  address  of  the  destination  area  is  within  the 
source  area.  If  it  is,  then  working  up  from  the 
base  address  would  overwrite  some  source  data. 
To  avoid  overwriting,  the  program  works  down 
from  the  highest  address  (this  is  sometimes  called 
a  move  right).  If  the  base  address  of  the  destina- 
tion area  is  not  within  the  source  area,  the 
program  simply  moves  the  data  starting  from 
the  lowest  address  (this  is  sometimes  called  a 
move  left).  An  area  size  (number  of  bytes  to 
move)  of  0000)6  causes  an  exit  with  no  memory 
changed.  The  program  provides  automatic  ad- 
dress wraparound  mod  64K. 


Registers  Used:  AF,  BC,  de,  hl 

Execution  Time:  21  cycles  per  byle  plus  97  cycles 
overhead  if  data  can  be  moved  starting  from  the 
lowest  address  (i.e.,  left)  or  1.34  cycles  overhead  if 
data  must  be  moved  starting  from  the  highest 
address  (i.e.,  right)  because  of  overlap. 

Program  Size:  27  bytes 

Data  Memory  Required:  None 

Special  Cases: 

1 .  A  size  (number  of  bytes  to  move)  of  0  causes  an 
immediate  exit  with  no  memory  changed. 

2.  M  oving  data  to  or  from  areas  occupied  or  used 
by  the  program  itself  or  by  the  stack  will  have 
unpredictable  results. 


Entry  Conditions 

Base  address  of  source  area  in  HL 
Base  address  of  destination  area  in  DE 
Number  of  bytes  to  move  in  register  BC 


Exit  Conditions 

The  block  of  memory  is  moved  from  the  source 
area  to  the  destination  area.  If  the  number  of 
bytes  to  be  moved  is  NBYTES,  the  base  address 
of  the  destination  area  is  DEST,  and  the  base 
address  of  the  source  area  is  SOURCE,  then  the 
data  in  addresses  SOURCE  through  SOURCE 
+  NBYTES  -  1  is  moved  to  addresses  DEST 
through  DEST  +  NBYTES  -  I. 


Examples 


Data:     Number  of  bytes  to  move  =  0200 

Base  address  of  destination  area  =  0.5D1  ^ 
Base  address  of  source  area  =  0.35E|^ 
Result;     The  contents  of  locations  03.5E,5  through 
055Di5  are  moved  to  OSDIij  through 
07D0„ 


2.     Data:      Number  of  bytes  to  move  =  1B7A 


16 


Base  address  of  destination  area  =  C946 
Base  address  of  source  area  =  C.IOO,, 


16 


Result:     The  contents  of  locations  C300|j  through 


DE79 
E4BF 
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Note  that  Example  2  is  a  more  difficult  prob- 
lem than  Example  1  because  the  source  and  des- 
tination areas  overlap.  If,  for  instance,  the  pro- 
gram were  simply  to  move  data  to  the  destination 
area  starting  from  the  lowest  address,  it  would 
initially  move  the  contents  of  C300i6  to  C946i6. 


This  would  destroy  the  old  contents  of  C946i6, 
which  are  needed  later  in  the  move.  The  solution 
to  this  problem  is  to  move  the  data  starting  from 
the  highest  address  if  the  destination  area  is 
above  the  source  area  but  overlaps  it. 


Title 
Name: 


Block  Move 
BLKMOV 


Purposes 
Entry! 


Exit  i 


Move  data  from  source  to  destination 


Register »H 
Register  L 
Register 
Register 
Register  B 
Register  C 


D 
E 


High  byte  of  source  address 

Low  byte  of  source  address 

High  byte  of  destination  address 

Low  byte  of  destination  address 

High  byte  of  number  of  bytes  to  move 

Low  byte  of  number  of  bytes  to  move 


Data  moved  from  source  to  destination 


Registers  used: AF, BC, DE, HL 
Time: 


Size: 


21  cycles  per  byte  plus  97  cycles  overhead 
if  no  overlap  exists,   134  cycles  overhead 
if  overlap  occurs 

Program  27  bytes 


BLKMOV: 


LD 
OR 
RET 


A,B 

C 

Z 


;IS  SIZE  OF  AREA  0? 

;YES,   RETURN  WITH  NOTHING  MOVED 


DETERMINE  IF  DESTINATION  AREA  IS  ABOVE  SOURCE  AREA  AND  OVERLAPS 
IT  (OVERLAP  CAN  BE  MOD  64K).     OVERLAP  OCCURS  IF 
STARTING  DESTINATION  ADDRESS  MINUS  STARTING  SOURCE  ADDRESS 
(MOD  64K)   IS  LESS  THAN  NUMBER  OF  BYTES  TO  MOVE 

EX  DE.HL  J  CALCULATE  DESTINATION  -  SOURCE 

PUSH        HL  jSAVE  DESTINATION 

AND  A  ?  CLEAR  CARRY 
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SBC 

HL.DE 

AND 

A 

SBC 

HL,BC 

POP 

HL 

EX 

DE.HL 

JR 

NCDOLEFT 

DOLEFT: 


?THEN  SUBTRACT  AREA  SIZE 
S RESTORE  DESTINATION 
J  JUMP  IF  NO  PROBLEM  WITH  OVERLAP 

J  DESTINATION  AREA  IS  ABOVE  SOURCE  AREA  AND  OVERLAPS  IT 
;MOVE  FROM  HIGHEST  ADDRESS  TO  AVOID  DESTROYING  DATA 
ADD  HL,BC  J  SOURCE  =  SOURCE  +  LENGTH  -  1 

DEC  HL 

EX  DE.HL  jDEST  =  DEST  +  LENGTH  -  1 

ADD  HL,BC 
DEC  HL 
EX  DE,HL 

LDDR  ; BLOCK  MOVE  HIGH  TO  LOW 

RET 

J  ORDINARY  MOVE  STARTING  AT  LOWEST  ADDRESS 

LDIR  J  BLOCK  MOVE  LOW  TO  HIGH 

RET 


> 

5 

SAMPLE 

EXECUTION: 

r 

SOURCE 

EQU 

2000H 

DEST 

EQU 

201  OH 

LEN 

EQU 

IIH 

(MOVE 

U  HEX  BYTES 

SC5B: 

LD 

HL, SOURCE 

LD 

DE.DEST 

LD 

BCLEN 

CALL 

BLKMOV 

JR 

SC5B 

jBASE  ADDRESS  OF  SOURCE  AREA 

J  BASE  ADDRESS  OF  DESTINATION  AREA 

; NUMBER  OF  BYTES  TO  MOVE 


J  MOVE  DATA  FROM  SOURCE  TO  DESTINATION 


END 


Two-Dimenslonal  Byte  Array 
Indexing  (D2BYTE) 


5C 


Calculates  the  address  of  an  element  of  a 
two-dimensional  byte-length  array,  given  the 
base  address  of  the  array,  the  two  subscripts  of 
the  element,  and  the  size  of  a  row  (that  is,  the 
number  of  columns).  The  array  is  assumed  to  be 
stored  in  row  major  order  (that  is,  by  rows)  and 
both  subscripts  are  assumed  to  begin  at  0. 

Procedure:  The  program  multiplies  the  row 
size  (number  of  columns  in  a  row)  times  the  row 
subscript  (since  the  elements  are  stored  by  rows) 
and  adds  the  product  to  the  column  subscript.  It 
then  adds  the  sum  to  the  base  address.  The 
program  performs  the  multiplication  using  a 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  Approximately  1100  cycles,  de- 
pending mainly  on  the  amount  of  time  required  to 
perf  orm  the  multiplication. 

Program  Size:  44  bytes 

Data  Memory  Required:  Four  bytes  anywhere  in 
memory  to  hold  the  return  address  (two  bytes  start- 
ing at  address  RETADR)  and  the  column  subscript 
(two  bytes  starting  at  address  SS2). 


Standard  shift-and-add  algorithm  (see  Subrou- 
tine 6A). 


Entry  Conditions  Exit  Conditions 

Order  in  stack  (starting  from  the  top) 

Less  significant  byte  of  return  address  Address  of  element  in  HL 

More  significant  byte  of  return  address 

Less  significant  byte  of  column  subscript 
More  significant  byte  of  column  subscript 

Less  significant  byte  of  the  size  of  a  row  (in  bytes) 
More  significant  byte  of  the  size  of  a  row  (in  bytes) 

Less  significant  byte  of  row  subscript 
More  significant  byte  of  row  subscript 

Less  significant  byte  of  base  address  of  array 
More  significant  byte  of  base  address  of  array 


Examples 


1.     Data:     Base  address  =  3C00|j 

Column  subscript  =  0004|5 

Size  of  row  (number  of  columns)  =  0018 

Row  subscript  =  0003 15 


Result:      Element  address  =  3C0O,j  +  0003,(,  *  0018,6  + 
0004|^  =  3C00,f,  +  0048|j  +  0004^  = 
3C4C,6 

That  is,  the  address  of  ARRAY(3,4)  is  3C4C,j 
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Note  that  all  subscripts  are  hexadecimal 
(35]6=53,o). 

The  general  formula  is 

ELEMENT  ADDRESS  =  ARRAY  BASE 
ADDRESS  +  ROW  SUBSCRIPT  *  ROW  SIZE 
+  COLUMN  SUBSCRIPT 


2.     Data:      Base  address  =  6A4A|j 

Column  subscript  =  0035|(; 

Size  of  row  {number  of  columns)  =  0050|(, 

Row  subscript  =  0002|g 


Result:     Element  address  =  6A4A|6  +  0002|j  *  0050|(,+ 


0035|(i=  6A4A,, 


00  AO,, 


0035, 


6B1F 


16 


That  is,  the  address  of  ARRAY(2,35)  is 

Note  that  we  refer  to  the  size  of  the  row  sub- 
script; the  size  is  the  number  of  consecutive 
memory  addresses  for  which  the  subscript  has 
the  same  value.  This  is  also  the  number  of  bytes 
from  the  starting  address  of  an  element  to  the 
starting  address  of  the  element  with  the  same 
column  subscript  but  a  row  subscript  one  larger. 


Title  Two-dimensional  byte  array  indexing 

Names  D2BYTE 


Purpose;  Given  the  base  address  of  a  byte  array,  two 

subscripts   'I-', 'J-',  and  the  size  of  the  first 
subscript  in  bytes,  calculate  the  address  of 
ACI,JJ.  The  array  is  assumed  to  be  stored  in 
row  major  order  (A[0,03,  ACO, 13,...,  ACK,L3), 
and  both  dimensions  are  assumed  to  begin  at 
zero  as  in  the  following  Pascal  declaration: 
AsARRAYCO. .2,0. .73  OF  BYTEs 


Entry:  TOP  OF  STACK 

Low  byte  of  return  address. 
High  byte  of  return  address. 

Low  byte  of  second  subscript   (column  element). 
High  byte  of  second  subscript   (column  element). 
Low  byte  of  first  subscript  size,   in  bytes. 
High  byte  of  first  subscript  size,   in  bytes. 
Low  byte  of  first  subscript   (row  element). 
High  byte  of  first  subscript   (row  element). 
Low  byte  of  array  base  address, 
High  byte  of  array  base  address, 
NOTE: 

The  first  subscript  size  is  length  of  a  row 
in  bytes 
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Exits  Register  H  =  High  byte  of  element  address 

Register  L  =  Low  byte  of  element  address 

Registers  used!  AF,BC,DE,  HL 

Time:  Appronimately  1100  cycles 

Size:  Program  44  bytes 

Data  4  bytes 


D2BYTE! 

fSAVE  RETURN  ADDRESS 

POP  HL 

LD  (RETADR>,HL 


JOET  SECOND  SUBSCRIPT 

POP  HL 

LD  (SS2),HL 

5 GET  SIZE  OF  FIRST  SUBSCRIPT 

POP  DE  ; GET 

POP  BC  ; GET 


(ROW  LENGTH),   FIRST  SUBSCRIPT 
LENGTH  OF  ROW 
FIRST  SUBSCRIPT 


; MULTIPLY  FIRST  SUBSCRIPT  »  ROW  LENGTH  USING  SHIFT  AND  ADD 
J  ALGORITHM.  PRODUCT  IS  IN  HL 


MLPs 


LD 

HL.O 

; PRODUCT  =  0 

LD 

A,  15 

; COUNT  =  BIT  LENGTH  -  1 

SLA 

E 

H SHIFT  LOW  BYTE  OF  MULTIPLIER 

RL 

D 

5 ROTATE  HIGH  BYTE  OF  MULTIPLIER 

JR 

NCMLPl 

jJUMP  IF  MSB  OF  MULTIPLIER  =  0 

ADD 

HL,BC 

;ADD  MULTIPLICAND  TO  PARTIAL  PRODUCT 

ADD 

HL,HL 

f SHIFT  PARTIAL  PRODUCT 

DEC 

A 

JR 

NZ,MLP 

! CONTINUE  THROUGH  15  BITS 

!D0  LAST  ADD  IF  MSB  OF  MULTIPLIER  IS  1 

OR  D  fSIGN  FLAG  =  MSB  OF  MULTIPLIER 

JP  P,MLP2 

ADD  HL,BC  jADD  IN  MULTIPLICAND  IF  SIGN  =  1 

;ADD  IN  SECOND  SUBSCRIPT 
MLP2S       LD  DE, (SS2) 

ADD  HL,DE 

;ADD  BASE  ADDRESS  TO  FORM  FINAL  ADDRESS 

POP  DE  ?GET  BASE  ADDRESS  OF  ARRAY 

ADD  HL,DE  jADD  BASE  TO  INDEX 


; RETURN  TO  CALLER 

LD  DE,(RETADR)  ; RESTORE  RETURN  ADDRESS  TO  STACK 

PUSH  DE 

RET 


J  DATA 
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RETADR:  DS 
SS2:  DS 


2 
2 


; TEMPORARY  FOR  RETURN  ADDRESS 
; TEMPORARY  FOR  SECOND  SUBSCRIPT 


SAMPLE  EXECUTION: 


SCSC: 


LD 

PUSH 

LD 

PUSH 
LD 

PUSH 
LD 

PUSH 
CALL 


HL,ARY 
HL 

HL, (SUESl) 
HL 

HL, (SSUBSl) 
HL 

HL, (SUBS2) 
HL 

D2BYTE 


fPUSH  BASE  ADDRESS  OF  ARRAY 

jPUSH  FIRST  SUBSCRIPT 

;PUSH  SIZE  OF  FIRST  SUBSCRIPT 

5  PUSH  SECOND  SUBSCRIPT 

; CALCULATE  ADDRESS 

;FOR  THE  INITIAL  TEST  DATA 

;HL  =  ADDRESS  OF  ARY(2,4) 

J       =  ARY  +  (2«S>  +  4 

!       =  ARY  +  20  (CONTENTS  ARE  21) 

!NOTE  BOTH  SUBSCRIPTS  START  AT  0 


JR 


SC5C 


J  DATA 

SUBSl!     DW  2 

SSUBSl!   DW  8 

SUBS2:     DW  4 


; SUBSCRIPT  1 

J  SIZE  OF  SUBSCRIPT 

; SUBSCRIPT  2 


5THE  ARRAY  (3  ROWS  OF  8  COLUMNS) 

ARY:         DB  1, 2, 3, 4, 5, 6, 7, 8 

DB  9  , 10, 11, 12, 13, 14, 15, 16 

DB  17,13,19,20,21,22,23,24 


END 


Two-Dimensional  Word  Array 

Indexing  (D2WORD) 


5D 


Calculates  the  starting  address  of  an  element 
of  a  two-dimensional  word-length  ( 16-bit)  array, 
given  the  base  address  of  the  array,  the  two 
subscripts  of  the  element,  and  the  size  of  a  row  in 
bytes.  The  array  is  assumed  to  be  stored  in  row 
major  order  (that  is,  by  rows)  and  both  sub- 
scripts are  assumed  to  begin  at  0. 

Procedure:  The  program  multiplies  the  row 
size  (in  bytes)  times  the  row  subscript  (since  the 
elements  are  stored  by  row),  adds  the  product  to 
the  doubled  column  subscript  (doubled  because 
each  element  occupies  two  bytes),  and  adds  the 
sum  to  the  base  address.  The  program  uses  a 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  Approximately  1100  cycles,  de- 
pending mainly  on  how  long  it  takes  to  multiply  row 
size  times  row  subscript 

Program  Size:  45  bytes 

Data  Memory  Required:  Four  bytes  anywhere  In 
memory  to  hold  the  return  address  (two  bytes  start- 
ing at  address  RETADR)  and  the  column  subscript 

(two  bytes  starting  at  address  SS2) 


Standard  shift-and-add  algorithm  (see  Subrou- 
tine 6A)  to  multiply. 


Entry  Conditions 

Order  in  stacl(  (starting  at  the  top) 

Less  significant  byte  of  return  address 
More  significant  byte  of  return  address 

Less  significant  byte  of  column  subscript 
More  significant  byte  of  column  subscript 

Less  significant  byte  of  size  of  rows  (in  bytes) 
More  significant  byte  of  size  of  rows  (in  bytes) 

Less  significant  byte  of  row  subscript 
More  significant  byte  of  row  subscript 

Less  significant  byte  of  base  address  of  array 
More  significant  byte  of  base  address  of  array 


Exit  Conditions 

Starting  address  of  element  in  HL 
The  element  occupies  the  address  in  HL  and  the 
next  higher  address 


Examples 

I.     Data:      Base  address  =  5E14|g 

Column  subscript  =  0008 

Size  of  a  row  (in  bytes)  =  001 (i.e.,  each 
tow  has  0014|Q  or  OOOE^  word-length  ele- 
ments) 

Row  subscript  =  0005  ^ 


Result:  Element  starting  address  =  5E14|5  -t-  0005 1^* 
00]C|6  -I-  0008,6  *  2  =  5E14|(,  -h  008C,(,-t- 
OOlO.j  =  5EB0|j 

That  is,  the  starting  address  of  ARRAY(5,8) 
is  5EB0|j  and  the  element  occupies  SEBOi^ 
and  5EB1 
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Data:     Base  address  =  BlOO^ 

Column  subscript  =  0002,5 

Size  of  a  row  (in  bytes)  =  OOO815  (i.e.,  each 

row  has  four  word-length  elements) 
Row  subscript  =  OOO615 


Result:     Element  starting  address  =  BlOO,^ 

0008,s  +  0002,5  *  2  -  BlOOis  +  OCWu  + 


-0006 


16' 


0004l5=B134,5 

That  is,  the  starting  address  of  ARRAY (6,2) 
is  B134]5  and  the  element  occupies  BI34|5 
and  8135,5 


The  general  formula  is 


ELEMENT  STARTING  ADDRESS  =  ARRAY 
BASE  ADDRESS  +  ROW  SUBSCRIPT  * 
SIZE  OF  ROW  +  COLUMN  SUBSCRIPT  *  2 


Note  that  one  parameter  of  this  routine  is  the 
size  of  a  row  in  bytes.  The  size  for  word-length 
elements  is  the  number  of  columns  per  row 
times  2  (the  size  of  an  element  in  bytes).  The 
reason  we  chose  this  parameter  rather  than  the 
number  of  columns  or  the  maximum  column 
index  is  that  this  parameter  can  be  calculated 
once  (when  the  array  bounds  are  determined) 
and  used  whenever  the  array  is  accessed.  The 
alternative  parameters  (number  of  columns  or 
maximum  column  index)  would  require  extra 
calculations  during  each  indexing  operation. 


Title 
Name: 


Two-dimensional  word  array  indexing 
D2W0RD 


Purpose: 


Entry: 


Given  the  base  address  of  a  word  array,  two 
subscripts  'I', 'J',  and  the  size  of  the  first 
subscript  in  bytes,  calculate  the  address  of 
ACI,J3.  The  array  is  assumed  to  bestored  in 
row  major  order  (AC0,03,  AC0,1],...,  ACK,L3), 
and  both  dimensions  are  assumed  to  begin  at 
zero  as  in  the  following  Pascal  declaration: 
As ARRAYCO. .2,0. .73  OF  WORD? 

TOP  OF  STACK 

Low  byte  of  return  address. 
High  byte  of  return  address. 

Low  byte  of  second  subscript   (column  element.) 
High  byte  of  second  subscript  (column  element) 
Low  byte  of  first  subscript  size,   in  bytes. 
High  byte  of  first  subscript  size,   in  bytes. 
Low  byte  of  firs|  subscript   (row  element.). 
High  byte  of  first  subscript   (row  element). 
Low  byte  of  array  base  address. 
High  byte  of  array  base  address, 
NOTE: 

The  first  subscript  size  is  length  of  a  row 
in  words  «  2 
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Exit:  Register  H  =  High  byte  of  element  address 

Register  L  =  High  byte  of  element  address 

Registers  used:  AF,BC,DE,HL 

Time:  Approximately  1100  cycles 

Size;  Program  45  bytes 

Data  4  bytes 


D2W0RD: 

jSAVE  RETURN  ADDRESS 

POP  HL 

LD  (RETADR),HL 


jOET  SECOND  SUBSCRIPT,  MULTIPLY  BY  2  FOR  WORD-LENGTH  ELEMENTS 
POP  HL 

ADD  HL,HL  J«  2 

LD  tSS2),HL 

;GET  SIZE  OF  FIRST  SUBSCRIPT  (ROW  LENGTH),   FIRST  SUBSCRIPT 

POP  DE  ;GET  LENGTH  OF  ROW 

POP  EC  !GET  FIRST  SUBSCRIPT 


; MULTIPLY  FIRST  SUBSCRIPT  »  ROW  LENGTH  USING  SHIFT  AND  ADD 
;   ALGORITHM.   PRODUCT  IS  IN  HL 


MLP: 


LD 

HL,0 

; PRODUCT  =  0 

LD 

A,  15 

; COUNT  =  BIT  LENGTH  -  1 

SLA 

E 

; SHIFT  LOW  BYTE  OF  MULTIPLIER 

RL 

D 

; ROTATE  HIGH  BYTE  OF  MULTIPLIER 

JR 

NCMLPl 

jJUMP  IF  MSB  OF  MULTIPLIER  =  0 

ADD 

HL.BC 

;ADD  MULTIPLICAND  TO  PARTIAL  PRODUCT 

ADO 

HL.HL 

J  SHIFT  PARTIAL  PRODUCT 

DEC 

A 

JR 

NZ , MLP 

; CONTINUE  THROUGH  15  BITS 

?ADD  MULTIPLICAND  IN  LAST  TIME  IF  MSB  OF  MULTIPLIER  IS  1 
OR  D  ;SIGN  FLAG  =  MSB  OF  MULTIPLIER 

UP  P,MLP2 

ADD  HL,EC  sADD  IN  MULTIPLICAND  IF  SIGN  =  1 

;ADD  IN  SECOND  SUBSCRIPT 
LD  DE, (SS2) 

ADD  HL,DE 


J  ADD  BASE  ADDRESS  TO  FORM  FINAL  ADDRESS 

POP  DE  ;GET  BASE  ADDRESS  OF  ARRAY 

ADD  HL,DE  ;ADD  BASE  TO  INDEX 

; RETURN  TO  CALLER 

LD  DE,(RETADR)  ; RESTORE  RETURN  ADDRESS  TO  STACK 

PUSH  DE 

RET 
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jDATA 
RET ADR:   DS  2 
SS2!         DS  2 


J  TEMPORARY  FOR  RETURN  ADDRESS 
J  TEMPORARY  FOR  SECOND  SUBSCRIPT 


SC5D: 


SAMPLE  EXECUTION! 


LD 

PUSH 

LD 

PUSH 

LD 

PUSH 

LD 

PUSH 
CALL 


HL, ARY 
HL 

HL,  (SLIBSn 
HL 

HL,  (SSLIBSl) 
HL 

HL, (SUBS2) 
HL 

D2W0RD 


J  PUSH  BASE  ADDRESS  OF  ARRAY 

fPUSH  FIRST  SUBSCRIPT 

jPUSH  SIZE  OF  FIRST  SUBSCRIPT 

jPUSH  SECOND  SUBSRIPT 

; CALCULATE  ADDRESS 

?FOR  THE  INITIAL  TEST  DATA 

jHL  =  ADDRESS  OF  ARY (2, 4) 

;       =  ARY  +  (2»16)  +  4  «  2 

}       =  ARY  +  40  (CONTENTS  ARE  2100H) 

jNOTE  BOTH  SUBSCRIPTS  START  AT  0 


JR 


SC5D 


(DATA 

SUBSl!     DW  2 

SSUBSl:  DW  16 

SUBS2:     DW  4 


{SUBSCRIPT  1 

jSIZE  OF  SUBSCRIPT  1 

; SUBSCRIPT  2 


;THE  ARRAY  (3  ROWS  OF  8  COLUMNS) 

ARY:         DW  OlOOH, 0200H, 0300H, 0400H, 0500H,  0600H, 0700H, 0800H 

DW  0900H, lOOOH, UOOH, 1200H,  1300H,  1400H,  1500H, 1600H 

DW  1700H, 1800H, I900H, 2000H, 2100H, 2200H, 2300H, 2400H 


END 


N-Dimensional  Array 

indexing  (NDIM) 


5E 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  Approximately  1300  cycles  per 
dimension  plus  165  cycles  overhead  (depending 
mainly  on  how  much  time  is  required  to  perform  the 
multiplications) 

Program  Size:  120  bytes 

Data  Memory  Required:  Five  bytes  anywhere  in 
memory  to  hold  the  return  address  (two  bytes  start- 
ing at  address  RETADR),  the  accumulated  offset 
(two  bytes  starting  at  address  OFFSET),  and  the 
number  of  dimensions  (one  byte  at  address 
NUMDIM) 

Special  Case:  If  the  number  of  dimensions  is  0,  the 
program  returns  with  the  base  address  in  HL. 


Calculates  the  starting  address  of  an  element 
of  an  N-dimensional  array  given  the  base  address 
and  N  pairs  of  sizes  and  subscripts.  The  size  of  a 
dimension  is  the  number  of  bytes  from  the  start- 
ing address  of  an  element  to  the  starting  address 
of  the  element  with  an  index  one  larger  in  the 
dimension  but  the  same  in  all  other  dimensions. 
The  array  is  assumed  to  be  stored  in  row  major 
order  (that  is,  organized  so  that  subscripts  to  the 
right  change  before  subscripts  to  the  left). 

Note  that  the  size  of  the  rightmost  subscript  is 
simply  the  size  of  the  elements  (in  bytes);  the  size 
of  the  next  subscript  is  the  size  of  the  elements 
times  the  maximum  value  of  the  rightmost  sub- 
script plus  1,  and  so  forth.  All  subscripts  are 
assumed  to  begin  at  0.  Otherwise,  the  user  must 
normalize  the  subscripts.  (See  the  second  exam- 
ple at  the  end  of  the  listing.) 

Procedure:  The  program  loops  on  each  dimen- 
sion, calculating  the  offset  in  that  dimension  as 
the  subscript  times  the  size.  If  the  size  is  an  easy 


case  (an  integral  power  of  2),  the  program  reduc- 
es the  multiplication  to  left  shifts.  Otherwise,  it 
performs  each  multiplication  using  the  shift- 
and-add  algorithm  of  Subroutine  6A.  Once  the 
program  has  calculated  the  overall  offset,  it  adds 
that  offset  to  the  base  address  to  obtain  the 
starting  address  of  the  element. 


Entry  Conditions 

Order  in  slacl<  (starting  from  the  top) 

Less  significant  byte  of  return  address 
More  significant  byte  of  return  address 

Less  significant  byte  of  number  of  dimensions 
More  significant  byte  of  number  of  dimensions 
(not  used) 

Less  significant  byte  of  size  of  rightmost  dimen- 
sion 

More  significant  byte  of  size  of  rightmost  dimen- 
sion 

Less  significant  byte  of  rightmost  subscript 
More  significant  byte  of  rightmost  subscript 


ixit  Conditions 

Starting  address  of  element  in  HL 

The  element  occupies  memory  addresses  START 
through  START  4-  SIZE  -  1,  where  START 
is  the  calculated  address  and  SIZE  is  the  size 
of  an  element  in  bytes. 
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Less  significant  byte  of  size  of  leftmost  dimen- 
sion 

More  significant  byte  of  size  of  leftmost  dimen- 
sion 

Less  significant  byte  of  leftmost  subscript 
More  significant  byte  of  leftmost  subscript 

Less  significant  byte  of  base  address  of  array 
More  significant  byte  of  base  address  of  array 


Example 

The  general  formula  is 

STARTING  ADDRESS  =  BASE  ADDRESS  + 
N-1 

SUBSCRIPT)  *  SIZE; 

i=0 
where 

N  is  the  number  of  dimensions 
SUBSCRIPTi  is  the  ith  subscript 
SIZE|  is  the  size  of  the  /th  dimension 

Note  that  we  use  the  size  of  each  dimension  as 
a  parameter  to  reduce  the  number  of  repetitive 
multiplications  and  to  generalize  the  procedure. 
The  sizes  can  be  calculated  and  saved  as  soon  as 
the  bounds  of  the  array  are  known.  Those  sizes 
can  then  be  used  whenever  indexing  is  per- 
formed on  that  array.  Obviously,  the  sizes  do  not 
change  if  the  bounds  are  fixed,  and  they  should 
not  be  recalculated  as  part  of  each  indexing 
operation.  The  sizes  are  also  general,  since  the 
elements  can  themselves  consist  of  any  number 
of  bytes. 


1.     Data:      Base  address  ==  3C00|5 

Number  of  dimensions  =  0003 ,5 
Rightmost  subscript  =  0005]^ 
Rightmost  size  =  0003,5  (-^-byte  entries) 
Middle  subscript  =  0003,5 
Middle  size  =  0012,5  (six  .3-byte  entries) 
Leftmost  subscript  =  0004  ^ 
Leftmost  size  =  007E,f,  (seven  sets  of  six  .3- 
byte  entries) 

Result:     Element  starting  address  =  3000,5  +  0005 ,5  * 
0003,5  +  0003,5  *  0012,5  +  0004,5  * 
007E|5  =  3C00,5  +  000F,5  +  0036,5  + 
01F8,5=3E3D,5 
That  is,  the  element  is  ARRAY (4,3,5);  it 
occupies  addresses  3E3D|5  through  3E3F,5 
(the  maximum  values  of  the  various  sub- 
scripts are  6  (leftmost)  and  5  (middle)  with 
each  element  occupying  three  bytes) 
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Title  N-dimensional  array  indexing 

Name:  NDIM 


Purpose:  Calculate  the  address  of  an  element  in  an 

N-dimensional  array  given  the  base  address, 
N  pairs  of  size  in  bytes  and  subscript,   and  the 
number  of  dimensions  of  the  array.  The  array  is 
assumed  to  be  stored  in  row  major  order 
(AC0,0,03,  ACCO,  1],  .  .  .  ,A[0,  1,03,  ACO,  1,13,...). 
Also,   it  is  assumed  that  all  dimensions  begin 
at  0  as  in  the  following  Pascal  declaration; 

A: ARRAYCO. . 10,0. .3,0. .53  OF  SOMETHING 
For  arrays  that  do  not  begin  at  0  boundaries, 
normalization  must  be  performed  before  calling 
this  routine.  An  example  is  given  at  the  end. 


Entry:  TOP  OF  STACK 

Low  byte  of  return  address. 

High  byte  of  return  address. 

Low  byte  of  number  dimensions. 

High  byte  of  number  dimensions  (not  used). 

Low  byte  of  dim  N-1  size 

High  byte  of  dim  N-1  size 

Low  byte  of  dim  N-1  subscript 

High  byte  of  dim  N-1  subscript 

Low  byte  of  dim  N-2  size 

High  byte  of  dim  N-2  size 

Low  byte  of  dim  N-2  subscript 

High  byte  of  dim  N-2  subscript 


Low  byte  of  dim  0  size 
High  byte  of  dim  0  size 
Low  byte  of  dim  0  subscript 
High  byte  of  dim  0  subscript 
Low  byte  of  array  base  address 
High  byte  of  array  base  address 
NOTE: 

All  sizes  are   in  bytes 


Exit ! 


Register  H  =  High  byte  of  address 
Register  L  =  Low  byte  of  address 


Registers  used:  AF,BC,DE,HL 


Time: 


Approximately  1300  cycles  per  dimension 
plus  165  cycles  overhead 


212    ARRAY  MANIPULATION 


9 

f  Size:  Program  120  bytes 

;  Data  5  bytes 


NDIdi 

;POP  PARAMETERS 

POP  HL 

LD  (RETADR),HL 

;QFFSET  :=  0 
LD  HL,0 
LD  (OFFSET J, HL 

;GET  NUMBER  OF  DIMENSIONS  AND  TEST  FOR  0 
POP  HL 
LD  A,L 

LD  (NUMDIM),A  fOET  NUMBER  OF  DIMENSIONS 

OR  A  ;TEST  FOR  0 

JR  Z.ADBASE  5 RETURN  WITH  BASE  ADDRESS  IN  HL 

;    IF  THERE  ARE  NO  DIMENSIONS 

SLOOP  ON  EACH  DIMENSION 

t  DOING  OFFSET  !=  OFFSET  +  (SUBSCRIPT  »  SIZE) 

LOOP: 


ADBASE: 


POP 

DE 

5 GET  SIZE 

POP 

HL 

;GET  SUBSCRIPT 

CALL 

NXTOFF 

J  OFFSET  !=  OFFSET  +  (SUBSCRIPT  « 

LD 

HL,NUMDIM 

DEC 

(HL) 

; DECREMENT  NUMBER  OF  DIMENSIONS 

JR 

NZ , LOOP 

; CONTINUE  THROUGH  ALL  DIMENSIONS 

!  CALCULATE  STARTING  ADDRESS  OF  ELEMENT 

i OFFSET 

=  BASE  +  OFFSET 

LD 

HL, (OFFSET) 

POP 

DE 

SGET  BASE  ADDRESS 

ADD 

HL,DE 

jSUM  WITH  OFFSET 

? RESTORE  RETURN  ADDRESS 

AND  EXIT 

LD 

DE, (RET ADR) 

PUSH 

DE 

RET 


? SUBROUTINE  NXTOFF 

; PURPOSE:  OFFSET  :=  OFFSET  +  (SUBSCRIPT  k  SIZE); 

J ENTRY:  OFFSET  =  CURRENT  OFFSET 

J  DE  =  CURRENT  SIZE  OF  THIS  DIMENSION 

;  HL  =  CURRENT  SUBSCRIPT 

fEXIT:     OFFSET  =  OFFSET  +  (SUBSCRIPT  +  SIZE)? 

5 REGISTERS  USED:  AF,   BC,   DE,  HL 
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NXTOFF: 


PUSH 


HL 


jSAVE  CURRENT  SUBSCRIPT  IN  STACK 


J  CHECK  IF  SIZE  IS  POWER  OF  2  LESS  THAN  256 


LD 
OR 
JR 


A,D 
A 

NZ,BieSZ 


SHIGH  BYTE  =  0  ? 

J  JUMP  IF  SIZE  IS  LARGE 


EASYLP: 


LD 
LD 
LD 
LD 

CP 

JR 

INC 

INC 

DJNZ 

JR 


A,  E 

HL, EASY AY 

B,  SZEASY 
CO 

(HL) 

Z, I SEAS Y 

HL 

C 

EASYLP 
BIGSZ 


;A  =  LOW  BYTE  OF  SIZE 

;HL  =  BASE  ADDRESS  OF  EASY AY 

;B  =  SIZE  OF  EASY  ARRAY 

;C  =  SHIFT  COUNTER 


;JUMP  IF  SIZE  IS  A  POWER  OF  2 

; INCREMENT  TO  NEXT  BYTE  OF  EASYAY 

INCREMENT  SHIFT  COUNTER 

; DECREMENT  COUNT 

SJUMP  IF  SIZE  IS  NOT  EASY 


ISEASY: 


SHIFT! 


POP 
LD 
OR 
JR 


HL 

A,C 

A 

Z , ADDOFF 


;GET  SUBSCRIPT 

;GET  NUMBER  OF  SHIFTS 

jTEST  FOR  0 

5  JUMP  IF  SHIFT  FACTOR  =  0 


{ELEMENT  SIZE  »  SUBSCRIPT  REDUCES  TO  LEFT  SHIFTS 
LD  B,A  ;B  =  SHIFT  COUNT 


ADD 

DJNZ 

JR 


HL,HL 
SHIFT 
ADDOFF 


! MULT I PLY  SUBSCRIPT  BY  2 

J  CONTINUE  UNTIL  DONE 

;DONE  SO  ADD  OFFSET  +  SUBSCRIPT 


BIGSZ: 


MLP: 


MLPl; 


5  SIZE  IS  NOT  POWER  OF  2,  MULTIPLY 

J  ELEMENT  SIZE  TIMES  SUBSCRIPT  THE  HARD  WAY 

POP  BC  ?GET  SUBSCRIPT 

! MULTIPLY  FIRST  SUBSCRIPT  k  ROW  LENGTH  USING  SHIFT  AND  ADD 
J  ALGORITHM.  RESULT  IS  IN  HL 
I  BC  =  SUBSCRIPT  (MULTIPLICAND) 
f  DE  =  SIZE  (MULTIPLIER) 


LD 

HL,0 

; PRODUCT  =  0 

LD 

A,  15 

J  COUNT  =  BIT  LENGTH  -  1 

SLA 

E 

J  SHIFT  LOW  BYTE  OF  MULTIPLIER 

RL 

D 

; ROTATE  HIGH  BYTE  OF  MULTIPLIER 

JR 

NCMLPi 

jJUMP  IF  MSB  OF  MULTIPLIER  =  0 

ADD 

HL,BC 

J  ADD  MULTIPLICAND  TO  PARTIAL  PRODUCT 

ADD 

HL.HL 

J  SHIFT  PARTIAL  PRODUCT 

DEC 

A 

JR 

NZ.MLP 

! CONTINUE  THROUGH  15  BITS 

;ADD 

IN  MULTIPLICAND 

LAST  TIME  IF  MSB  OF  MULTIPLIER  IS  1 

OR 

D 

;SIGN  FLAG  =  MSB  OF  MULTIPLIER 

JP 

P, ADDOFF 
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ADDOFF: 


ADD  HL,BC  ;ADD  IN  MULTIPLICAND  IF  SIGN 

J  ADD  SUBSCRIPT  »  SIZE  TO  OFFSET 


EX 

LD 

ADD 

LD 

RET 


DE,HL 

HL, (OFFSET) 
HL,DE 

( OFFSET ),HL 


J  GET  OFFSET 

;ADD  PRODUCT  OF  SUBSCRIPT  »  SIZE 
fSAVE  OFFSET 


EASYAYs 

D6 
DB 
OB 
DB 
DB 
DB 
DB 
DB 

SZEASY  EQU 


I 

2 

4 

8 

16 

32 

64 

126 

*-EASYAY 


; SHIFT  FACTOR 

?0 

!  1 

;2 
J3 
J4 
!5 
J6 
;7 


SDATA 

RETADRs   DS  2 

OFFSET:  DS  2 

NUMDIM:  DS  1 


{TEMPORARY  FOR  RETURN  ADDRESS 
! TEMPORARY  FOR  PARTIAL  OFFSET 
! NUMBER  OF  DIMENSIONS 


SAMPLE  EXECUTION: 


SC5E: 

jFIND  ADDRESS  OF  AY1C1,3,0] 

;  SINCE  LOWER  BOUNDS  OF  ARRAY  1  ARE  ALL  ZERO  IT  IS  NOT 
?     NECESSARY  TO  NORMALIZE  THEM 


jPUSH  BASE  ADDRESS  OF  ARRAY  1 
LD  HL,AY1 
PUSH  HL 


JPUSH  SUBSCRIPT/SIZE  FOR  DIMENSION  1 
LD  HL, 1 

PUSH        HL  J  SUBSCRIPT 

LD  HL,A1SZ1 

PUSH        HL  ; SI ZE 

J  PUSH  SUBSCRIPT/SIZE  FOR  DIMENSION  2 
LD  HL,3 

PUSH        HL  ; SUBSCRIPT 

LD  HL,A1SZ2 

PUSH        HL  fSIZE 

J  PUSH  SUBSCRIPT/SIZE  FOR  DIMENSION  3 
LD  HL,0 
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PUSH 
LD 

PUSH 


HL 

HL,A1SZ3 
HL 


; SUBSCRIPT 
jSIZE 


5 PUSH  NUMBER  OF  DIMENSIONS 
LD  HL,A1DIM 
PUSH  HL 


CALL 


NDIM 


CALCULATE  ADDRESS 

AY  =  STARTING  ADDRESS  OF  ARY1(1,3,0) 
=  ARY  +  (1K126)  +  (3«21)  +  (0*3) 
=  ARY  +  189 


; CALCULATE  ADDRESS  OF  AY2C-1,63 

;  SINCE  LOWER  BOUNDS  OF  AY2  DO  NOT  START  AT  0,  SUBSCRIPTS 
J     MUST  BE  NORMALIZED 


;OATA 
jAYl  ! 

AIDIM 
AIDIL 
AIDIH 
A1D2L 
A1D2H 


jPUSH 

BASE  ADDRESS 

OF  ARRAY  2 

LD 

HL, AY2 

PUSH 

HL 

J  PUSH 

(SUBSCRIPT  - 

LOWER 

BOUND) /SIZE  FOR  DIMENSION  1 

LD 

HL,-1 

LD 

DE,-A2D1L 

! NEGATIVE  OF  LOWER  BOUND 

ADD 

HL,DE 

jADD  NEGATIVE  TO  NORMALIZE  TO  0 

PUSH 

HL 

! SUBSCRIPT 

LD 

HL, A2SZ1 

PUSH 

HL 

jSIZE 

!  PUSH 

(SUBSCRIPT  - 

LOWER 

BOUND) /SIZE  FOR  DIMENSION  2 

LD 

HL,6 

LD 

DE,-A2D2L 

; NEGATIVE  OF  LOWER  BOUND 

ADD 

HL,DE 

J  ADD  NEGATIVE  TO  NORMALIZE  TO  0 

PUSH 

HL 

; SUBSCRIPT 

LD 

HL,A2SZ2 

PUSH 

HL 

jSIZE 

jPUSH 

NUMBER  OF  DIMENSIONS 

LD 

HL,A2DIM 

PUSH 

HL 

CALL 

NDIM 

! CALCULATE  ADDRESS 

;AY=STARTING  ADDRESS  OF  ARY U- 1,6) 

.     =ARY+(( (-l)-(-5))»18)+( (6-2)«2) 

J     =ARY  +  80 

JR 

SC5E 

ARRAYCAIDIL. .AIDIH, A1D2L. 

.A1D2H,A1D3L. .A1D3H]  3-BYTE  ELEMENTS 

[ 

0     .  .     3  , 

0  . 

5     ,     0     .  .     6  3 

EQU 

3 

; NUMBER  OF  DIMENSIONS 

EQU 

0 

5 LOW  BOUND  OF  DIMENSION  1 

EQU 

3 

SHIGH  BOUND  OF  DIMENSION  1 

EQU 

0 

5 LOW  BOUND  OF  DIMENSION  2 

EQU 

5 

J  HIGH  BOUND  OF  DIMENSION  2 
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A1D3L 
A1D3H 
A1SZ3 
A1SZ2 
AlSZl 
AYl: 

fAY2  : 

A2DIM 
A2D1L 
A2D1H 
A2D2L 
A2D2H 
A2SZ2 
A2SZ1 
AY2: 


EQU  0  ;LOW  BOUND  OF  DIMENSION  3 

E0U  6  5 HIGH  BOUND  OF  DIMENSION  3 

ECU  3  jSIZE  OF  ELEMENT  IN  DIMENSION  3 

EQU  ((AlD3H-AlD3L)+l)*iAlSZ3  jSIZE  OF  ELEMENT  IN  DIMENSION  2 

EQU  <CA1D2H-A1D2L)+1)«A1SZ2  sSIZE  OF  ELEMENT  IN  DIMENSION  1 

DS  ((A1D1H-A1D1L)+1)»A1SZ1  fARRAY 


ARRAYIAIDIL. 
t     -5  . 

2 


.A1D1H,A1D2L.  , 
.  -1.2, 


A1D2H] 
.    10  ] 


EQU 

EQU  -5 

EQU  -1 

EQU  2 

EQU  10 

EQU  2 

EQU  ((A2D2H-A2D2L>+1)«A2SZ2 

DS  ((A2D1H-A2D1L)+1)«A2SZ1 


OF  WORD 

! NUMBER  OF  DIMENSIONS 
J  LOW  BOUND  OF  DIMENSION  1 
J  HIGH  BOUND  OF  DIMENSION  1. 
jLOW  BOUND  OF  DIMENSION  2 
iiHIGH  BOUND  OF  DIMENSION  2 
;SIZE  OF  ELEMENT  IN  DIMENSION  2 
jSIZE  OF  ELEMENT  IN  DIMENSION  1 
; ARRAY 


END 


16-Bit  Mulfiplication  (MUL16) 


6A 


Multiplies  two  16-bit  operands  and  returns 
the  less  significant  (16-bit)  word  of  the  product. 

Procedure:  The  program  uses  an  ordinary 
shift-and-add  algorithm,  adding  the  multipli- 
cand to  the  partial  product  each  time  it  finds  a  1 
bit  in  the  multiplier.  The  partial  product  and  the 
muhiplier  are  shifted  left  15  times  (the  number 
of  bits  in  the  muhiplier  minus  1)  to  produce 
proper  alignment.  The  more  significant  16  bits 
of  the  product  are  lost. 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  Approximately  865  to  965  cycles, 

depending  largely  on  the  number  of  1  bits  in  the 

multiplier 

Program  Size:  22  bytes 

Data  IVIemory  Required:  None 


Entry  Conditions  Exit  Conditions 

Muhiplicand  in  HL  Less  significant  word  of  product  in  HL 

Muhipher  in  DE 


Examples 


1 .  Data: 


Result: 


2.     Data:        Multiplier  =  37D1,6 

Multiplicand  =  A045|5 

Result:         Product  =  A  655,,; 

This  is  actually  the  less  significant  16-bit  word 
of  the  32-bit  product  22F1  AB55,6. 

Note  that  MUL16  returns  only  the  less  signif-  bility  with  other  16-bit  arithmetic  operations, 
icant  word  of  the  product  to  maintain  compati-    The  more  significant  word  of  the  product  is  lost. 


Multiplier  =  0012|fi 
Multiplicand  =  03D1 16 

Product  =  44B2,6 

The  more  significant  word  is  0. 


Title  16-bit  Multiplication 

Names  MUL16 


Purposes  Multiply  2  signed  or  unsigned  i6-bit  words  and 

return  a  16-bit  signed  or  unsigned  product 
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MUL16: 


HUP! 


MLPl: 


En  t  r  y ; 


Exit; 


Answers  needing  more  than  16  bits:  bits  higher 
than  bit  15  are  lost 

Register  L  =  Low  byte  of  multiplicand 
Register  H  =  High  byte  of  multiplicand 
Register  E  =  Low  byte  of  multiplier 
Register  D  =  High  byte  of  multiplier 

Product  =  multiplicand  «  multiplier 
Register  L  =  Low  byte  of  product 
Register  H  =  High  byte  of  product 


Registers  useds  AF,BC,DE,HL 

Time:  Approximately  865  to  965  cycles 

Sise:  Program    22  bytes 

! INITIALIZE  PARTIAL  PRODUCT,   BIT  COUNT 

sBC  =  MULTIPLIER 


LD 
LD 
LD 
LD 


C.L 
B,H 
HL,0 
A,  15 


; PRODUCT  =  0 

J  COUNT  =  BIT  LENGTH  -  1 


SHIFT-AND-ADD  ALGORITHM 
IF  MSB  OF  MULTIPLIER  IS  1,   ADD  MULTIPLICAND  TO  PARTIAL 
PRODUCT 

SHIFT  PARTIAL  PRODUCT,  MULTIPLIER  LEFT  1  BIT 


SLA 
RL 
JR 
ADD 


E 
D 

NCMLPl 
HL,BC 


; SHIFT  MULTIPLIER  LEFT  1  BIT 

J  JUMP  IF  MSB  OF  MULTIPLIER  =  0 

J  ADD  MULTIPLICAND  TO  PARTIAL  PRODUCT 


ADD 
DEC 
JR 


HL,HL 
A 

NZ , MLP 


; SHIFT  PARTIAL  PRODUCT  LEFT 
; CONTINUE  UNTIL  COUNT  =  0 
SADD  MULTIPLICAND  ONE  LAST  TIME  IF  MSB  OF  MULTIPLIER  IS  1 


OR 
RET 
ADD 
RET 


D 
P 

HL,BC 


;SIGN  FLAG  =  MSB  OF  MULTIPLIER 
;EXIT  IF  MSB  OF  MULTIPLIER  IS  0 
;ADD  MULTIPLICAND  TO  PRODUCT 


SAMPLE  EXECUTION: 
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SC6A: 

LD  HL,-2 

LD  DE, 1023 

CALL  MUL16 


HL  =  MULTIPLICAND 
DE  =  MULTIPLIER 
16-BIT  MULTIPLY 
RESULT  OF  1023  «  -2 
REGISTER  L  =  02H 
H  =  F8H 


2046  =  0FS02H 


JR 
END 


SC6A 


16-Bit  Division  (SDIV16,  UDIV16) 


6B 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  Approximately  1770  to  2340  cycles, 
depending  largely  on  how  many  trial  subtractions  are 
successful  and  thus  require  the  replacement  of  the 
previous  dividend  by  the  remainder 

Program  Size:  104  bytes 

Data  Memory  Required:  .3  bytes  anywhere  in 
RAM  for  the  sign  of  the  quotient  (address  SQUOT), 
the  sign  of  the  remainder  (address  SREM),  and  a 
divide  loop  counter  (address  COUNT) 

Speciai  Cose:  If  the  divisor  is  0,  the  program 
returns  with  the  Carry  set  to  1 ,  and  both  the  quotient 
and  the  remainder  set  to  0. 


Divides  two  16-bit  operands  and  returns  the 
quotient  and  the  remainder.  There  are  two  entry 
points:  SDIV16  divides  two  16-bit  signed  oper- 
ands, whereas  UDIV16  divides  two  16-bit  un- 
signed operands.  If  the  divisor  is  0,  the  Carry 
flag  is  set  to  1  and  both  quotient  and  remainder 
are  set  to  0;  otherwise,  the  Carry  flag  is  cleared. 

Procedure:  If  the  operands  are  signed,  the 
program  determines  the  sign  of  the  quotient  and 
takes  the  absolute  values  of  any  negative  oper- 
ands. It  must  also  retain  the  sign  of  the  dividend, 
since  that  determines  the  sign  of  the  remainder. 
The  program  then  performs  an  unsigned  division 
using  a  shift-and-subtract  algorithm.  It  shifts 
the  quotient  and  dividend  left,  placing  a  1  bit  in 
the  quotient  each  time  a  trial  subtraction  is 
successful.  If  the  operands  are  signed,  the  program 
must  negate  (that  is,  subtract  from  0)  the 
quotient  or  remainder  if  either  is  negative.  The 


Carry  flag  is  cleared  if  the  division  is  proper  and 
set  if  the  divisor  is  0.  A  0  divisor  also  causes  a 
return  with  the  quotient  and  remainder  both  set 
toO. 


Entry  Conditions  Exit  Conditions 

Dividend  in  HL  Quotient  in  HL 

Divisor  in  DE  Remainder  in  DE 

If  the  divisor  is  non-zero,  Carry  =  0  and  the 

result  is  normal. 
If  the  divisor  is  0,  Carry  =  1  and  both  quotient 
and  remainder  are  0000. 


Exampies 


1.     Data:      Dividend  =  0.3  EO,, 


Divisor  =  00B6 


16 


Result;     Quotient  (from  UDIV16)  =  0005,^ 
Remainder  (from  UDIV16)  =  0052|j 
Carry  =  0  (no  divide-by-0  error) 


Data:      Dividend  =  D73A|6 
Divisor  =  02F1 15 

Result:      Quotient  (from  SDIV16)  =  FFF3|5 
Remainder  (from  SDIV16)  =  FD77|6 
Carry  =  0  (no  divide-by-0  error) 
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The  remainder  of  a  signed  division  may  be 
either  positive  or  negative.  In  this  procedure,  the 
remainder  always  takes  the  sign  of  the  dividend. 
A  negative  remainder  can  easily  be  converted 
into  one  that  is  always  positive.  Simply  subtract 


I  from  the  quotient  and  add  the  divisor  to  the 
remainder.  The  result  of  Example  2  is  then 

Quotient  =  FFF2,(,  =  -  Mm 
Remainder  (always  positive)  =  0068 1^ 


Title  16-bit  Division 

Names  SDIV16,  UDIV16 


Purposes  SDIV16 

Divide  2  signed  16-bit  words  and  return  a 
16-bit  signed  quotient  and  remainder 

UDIV16 


Divide 

2 

unsigned  16-bit  words  and  return 

16-bit 

unsigned  quotient  and  remainder 

Entry s 

Register 

L 

=  Low  byte  of  dividend 

Register 

H 

=  High  byte  of  dividend 

Register 

E 

=  Low  byte  of  divisor 

Register 

D 

=  High  byte  of  divisor 

Exit  s 

Register 

L 

=  Low  byte  of  quotient 

Register 

H 

=  High  byte  of  quotient 

Reg  i  ster 

E 

=  Low  byte  of  remainder 

Register 

D 

=  High  byte  of  remainder 

If  no  errors  then 

carry  ;=  0 
else 

divide-by-zero  error 
carry  :=  1 
quotient  s=  0 
remainder  :=  0 

Registers  useds  AF,BC,DE,HL 

Times  Approximately  1770  to  2340  cycles 


Sizes 


Program  108  bytes 
Data  3  bytes 
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! SIGNED  DIVISION 

SDIV16: 

{DETERMINE  SIGN  OF  QUOTIENT  BY  EXCLUSIVE  ORING  HIGH  BYTES 
!  OF  DIVIDEND  AND  DIVISOR.  QUOTIENT  IS  POSITIVE  IF  SIGNS 
J  ARE  THE  SAME,   NEGATIVE  IF  SIGNS  ARE  DIFFERENT 

{REMAINDER  HAS  SAME  SIGN  AS  DIVIDEND 

LD  A,H  ;GET  HIGH  BYTE  OF  DIVIDEND 

LD  (SREM.i,A  ?SAVE  AS  SIGN  OF  REMAINDER 

XOR  D  {EXCLUSIVE  OR  WITH  HIGH  BYTE  OF  DIVISOR 

LD  (SQLIOT),A  {SAVE  SIGN  OF  QUOTIENT 

jTAKE  ABSOLUTE  VALUE  OF  DIVISOR 

LD  A,D 

OR  A 

JP  P,CHKDE  jJUMP  IF  DIVISOR  IS  POSITIVE 

SUB  A  {SUBTRACT  DIVISOR  FROM  ZERO 

SUB  E 

LD  E,  A 

SBC  A, A  {PROPAGATE  BORROW  (A=FF  IF  BORROW) 

SUB  D 

LD  D.  A 

{TAKE  ABSOLUTE  VALUE  OF  DIVIDEND 

CHKDE: 

LD  A,H 

OR  A 

JP  P.DODIV  {JUMP  IF  DIVIDEND  IS  POSITIVE 

SUB  A  {SUBTRACT  DIVIDEND  FROM  ZERO 

SUB  L 

LD  L,  A 

SBC  A, A  {PROPAGATE  BORROW  (A=FF  IF  BORROW) 

SUB  H 

LD  H,  A 

{DIVIDE  ABSOLUTE  VALUES 

DODIV: 

CALL  UDIV16 

RET  C  {EXIT  IF  DIVIDE  BY  ZERO 

{NEGATE  QUOTIENT  IF  IT  IS  NEGATIVE 


LD 

A, (SQUOT) 

OR 

A 

JP 

P.DOREM 

{JUMP  IF  QUOTIENT  IS  POSITIVE 

SUE 

A 

{SUBTRACT  QUOTIENT  FROM  ZERO 

SUB 

L 

LD 

L,  A 

SBC 

A, A 

{PROPAGATE  BORROW  (A=FF  IF  BORROW) 

SUB 

H 

LD 

H,  A 

DOREM: 

{NEGATE  REMAINDER  IF  IT  IS  NEGATIVE 
LD  A,  (SREM) 

OR  A 
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RET 

P 

{RETURN  IF  REMAINDER  IS  POSITIVE 

SUB 

A 

5  SUBTRACT  REMAINDER  FROM  ZERO 

SUB 

E 

LD 

E,  A 

SBC 

A,  A 

J  PROPAGATE  BORROW  (A=FF  IF  BORROW) 

SUB 

D 

LD 

D,  A 

RET 

J  UNSIGNED  DIVISION 

UDIV16: 

5 CHECK  FOR  DIVISION  BY  ZERO 
LD  A,E 
OR  D 
JR  NZ, DIVIDE 

LD  HL,0 
LD  D,H 
LD  E,L 
SCF 
RET 


; BRANCH  IF  DIVISOR  IS  NON-ZERO 
; DIVIDE  BY  0  ERROR 

;SET  CARRY,    INVALID  RESULT 


DIVIDE! 


LD 
LD 
LD 
LD 
OR 


C,L 

A,  H 
HL,0 

B,  16 
A 


;C  =  LOW  BYTE  OF  DIVIDEND/QUOTIENT 
;A  =  HIGH  BYTE  OF  DIVIDEND/QUOTIENT 
;HL  =  REMAINDER 

BITS  IN  DIVIDEND 
! CLEAR  CARRY  TO  START 


DVLOOPs 


SHIFT  NEXT  BIT  OF  QUOTIENT  INTO  BIT  0  OF  DIVIDEND 
SHIFT  NEXT  MOST  SIGNIFICANT  BIT  OF  DIVIDEND  INTO 

LEAST  SIGNIFICANT  BIT  OF  REMAINDER 
BC  HOLDS  BOTH  DIVIDEND  AND  QUOTIENT.  WHILE  WE  SHIFT  A 

BIT  FROM  MSB  OF  DIVIDEND,   WE  SHIFT  NEXT  BIT  OF  QUOTIENT 

IN  FROM  CARRY 
HL  HOLDS  REMAINDER 


DO  A  32-BIT  LEFT  SHIFT.  SHIFTING 
CARRY  TO  C,   C  TO  A,   A  TO  L,   L  TO  H 
RL  C 
RLA 

RL  L 
RL  H 


jCARRY  (NEXT  BIT  OF  QUOTIENT)  TO  BIT  0, 
;   SHIFT  REMAINING  BYTES 


; CLEARS  CARRY  SINCE  HL  WAS  0 


J  IF  REMAINDER  IS  GREATER  THAN  OR  EQUAL  TO  DIVISOR,  NEXT 


BIT  OF  QUOTIENT  IS  1. 


PUSH 

SBC 

CCF 


JR 
EX 


HL 

HL,DE 


CDROP 
(SP),HL 


THIS  BIT  GOES  TO  CARRY 

jSAVE  CURRENT  REMAINDER 

; SUBTRACT  DIVISOR  FROM  REMAINDER 

J  COMPLEMENT  BORROW  SO  1  INDICATES 

!   A  SUCCESSFUL  SUBTRACTION 

J    (THIS  IS  NEXT  BIT  OF  QUOTIENT) 

jJUMP  IF  REMAINDER  IS  >=  DIVIDEND 

{OTHERWISE  RESTORE  REMAINDER 
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DROP: 


INC 
INC 
DJNZ 


SP 
SP 

DVLOOP 


J  DROP  REMAINDER  FROM  TOP  OF  STACK 
! CONTINUE  UNTIL  ALL  BITS  DONE 


J  SHIFT  LAST  CARRY  BIT  INTO  QUOTIENT 


EX  DE.HL 

RL  C 

LD  L,C 
RLA 

LD  H,A 

OR  A 
RET 


;DE  =  REMAINDER 
; CARRY  TO  C 

;L  =  LOW  BYTE  OF  QUOTIENT 

SH  =  HIGH  BYTE  OF  QUOTIENT 
; CLEAR  CARRY,   VALID  RESULT 


SQUOT: 

SREMs 

COUNT: 


SDATA 

DS  1 

DS  1 

DS  1 


jSIGN  OF  QUOTIENT 
J  SIGN  OF  REMAINDER 
; DIVIDE  LOOP  COUNTER 


SAMPLE  EXECUTION! 


SC6B: 


LD 
LD 

CALL 


HL,-1023 
DE, 123 
SDIV16 


SIGNED  DIVISION 

HL  =  DIVIDEND 

DE  =  DIVISOR 
QUOTIENT  OF  -1023 

L  =  F8H 

H  =  FFH 
REMAINDER  OF  -1023  / 

E  =  D9H 

D  =  FFH 


/  123  =  -S 


123 


-39 


LD 
LD 

CALL 


HL. 64513 
DE, 123 
UDIV16 


UNSIGNED  DIVISION 

HL  =  DIVIDEND 

DE  =  DIVISOR 
QUOTIENT  OF  64513 

L  =  OCH 

H  =  02H 
REMAINDER  OF  64513 

E  =  SDH 

D  =  OOH 


/  123  =  524 


/  123  =  61 


JR  SC6B 
END 


16-Bit  Comparison  (CMP16) 


6C 


Compares  two  16-bit  operands  and  sets  the 
flags  accordingly.  The  Zero  flag  always  indicates 
whether  the  numbers  are  equal.  If  the  operands 
are  unsigned,  the  Carry  flag  indicates  which  is 
larger  (Carry  —  1  if  subtrahend  is  larger  and  0 
otherwise).  If  the  operands  are  signed,  the  Sign 
flag  indicates  which  is  larger  (Sign=  1  if  subtra- 
hend is  larger  and  0  otherwise);  two's  comple- 
ment overflow  is  considered  and  the  Sign  flag  is 
inverted  if  it  occurs. 

Procedure:  The  program  subtracts  the  subtra- 
hend from  the  minuend.  If  two's  complement 
overflow  occurs  (Parity/  Overflow  flag=  I ),  the 
program  inverts  the  Sign  flag  by  EXCLUSIVE 
ORing  the  sign  bit  with  1 .  This  requires  an  extra 
right  shift  to  retain  the  Carry  in  bit  7  initially, 
since  XOR  always  clears  Carry.  The  program 
then  sets  Carry  to  ensure  a  non-zero  result  and 
shifts  the  data  back  to  the  left.  The  extra  left 


Entry  Conditions 

Minuend  in  HL 
Subtrahend  in  DE 


Registers  Used:  AF,  HL 

Execution  Time:  30  cycles  if  no  overflow,  57  cycles 
if  overflow 

Program  Size:  U  bytes 

Oaha  IVIemory  Required:  None 


shift  uses  ADC  A,A  rather  than  RLA  to  set  the 
Sign  and  Zero  flags  (RLA  would  affect  only 
Carry).  Bit  0  of  the  accumulator  must  be  1  after 
the  shift  (because  the  Carry  was  set),  thus 
ensuring  that  the  Zero  flag  is  cleared.  Obviously, 
the  result  cannot  be  0  if  the  subtraction  causes 
two's  complement  overflow.  Note  that  after  an 
addition  or  subtraction,  PE  (Parity/ Overflow 
flag  =  1)  means  "overflow  set"  while  PO 
(Parity/ Overflow  flag  =  0)  means  "overflow 
clear." 


Exit  Conditions 

Flags  set  as  if  subtrahend  had  been  subtracted 
from  minuend,  with  a  correction  if  two's  comple- 
ment overflow  occurred. 

Zero  flag=  1  if  the  subtrahend  and  minuend  are 
equal;  0  if  they  are  not  equal. 

Carry  flag  =  1  if  subtrahend  is  larger  than 
minuend  in  the  unsigned  sense;  0  if  it  is  less  than 
or  equal  to  the  minuend. 

Sign  flag  =  1  if  subtrahend  is  larger  than 
minuend  in  the  signed  sense;  0  if  it  is  less  than  or 
equal  to  the  minuend.  This  flag  is  corrected 
(inverted)  if  two's  complement  overflow  occurs 
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Examples 

1.  Data:      Minuend  (HL)=  03E1 ,5 

Subtrahend  (DE)  =  07E4|j 

Result:     Carry  =  1,  indicating  subtrahend  is  larger  in 

unsigned  sense. 
Zero=  0,  indicating  operands  are  not  equal. 
Sign  =  1,  indicating  subtrahend  is  larger  in 

signed  sense. 

2.  Data:      Minuend  (HL)  =  CSIA.^ 

Subtrahend  (DE)  =  C51A|6 

Result:     Carry  =  0,  indicating  subtrahend  is  not  larger 
in  unsigned  sense. 
Zero  =  1,  indicating  operands  are  equal. 
Sign  =  0,  indicating  subtrahend  is  not  larger 
in  signed  sense. 


3.     Data:      Minuend  (HL.)  =  A45D|j 
Subtrahend  (DE)  =  77E1  ,j 

Result:      Carry  =  0,  indicating  subtrahend  is  not  larger 
in  unsigned  sense. 
Zero  =  0,  indicating  operands  are  not  equal. 
Sign  =  1,  indicating  subtrahend  is  larger  in 
signed  sense. 

In  Example  3,  the  minuend  is  a  negative  two's 
complement  number,  whereas  the  subtrahend  is 
a  positive  two's  complement  number.  Subtract- 
ing produces  a  positive  result  (SCTCjg)  with 
two's  complement  overflow. 


Title 
Name : 


16-bit  Compare 
CMP  16 


Purpose: 


Entry: 


Exit: 


Compare  2  16-bit  signed  or  unsigned  words  and 
return  the  C,Z,S  flags  set  or  cleared 

Register  L  =  Low  byte  of  minuend 
Register  H  =  High  byte  of  minuend 
Register  E  =  Low  byte  of  subtrahend 
Register  D  =  High  byte  of  subtrahend 

Flags  returned  based  on  minuend  -  subtrahend 
If  both  the  minuend  and  subtrahend  are  2's 

complement  numbers,   then  use  the  Z  and  S 

flags; 

Else  use  the  Z  and  C  flags 
IF  minuend  =  subtrahend  THEN 
Z=1,S=0,C=0 
IF  minuend  >  subtrahend  THEN 

Z=O,S=0,C=O 
IF  minuend  <  subtrahend  THEN 
Z=0,S=1,C=1 


Registers  used:  AF,HL 


Time: 


30  cycles  if  no  overflow,  else  57  cycles 
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Size: 


Program  11  bytes 


CMP16! 


OR 

SBC 

RET 

LD 

RRA 

XOR 

SCF 

ADC 


OlOOOOOOB 


A 

HL,DE 

PO 

A,H 


CLEAR  CARRY 

SUBTRACT  SUBTRAHEND  FROM  MINUEND 
RETURN  IF  NO  OVERFLOW 
OVERFLOW  -  INVERT  SIGN  FLAG 
SAVE  CARRY  IN  BIT  7 
COMPLEMENT  BIT  6  (SIGN  BIT) 
ENSURE  A  NON-ZERO  RESULT 
RESTORE  CARRY,  COMPLEMENTED  SIGN 
ZERO  FLAG  =  0  FOR  SURE 


RET 


SAMPLE  EXECUTION! 


SC6C! 

; COMPARE  -32768  (8000  HEX)  AND  1 

J  SINCE  -32768  IS  THE  MOST  NEGATIVE  16-BIT  NUMBER, 
;     THIS  COMPARISON  WILL  SURELY  CAUSE  OVERFLOW 
LD  HL, -32768 

LD  DE, 1 

CALL        CMP16  ;CY  =  0,    Z  =  0,   S  =  1 


; COMPARE  -4  (FFFC  HEX)  AND  -1   (FFFF  HEX) 
LD  HL,-4 
LD  DE,-1 

CALL        CMP16  ;CY  =  1,   Z  =  0,  S 


1 


; COMPARE  -1234  AND 
LD  HL,-1234 
LD  DE,-1234 
CALL        CMP 16 


1234 


jCY  =  0,  Z 


S 


0 


JR 


SC6C 


END 


Multiple-Precision  Binary  Addition 

(MPBADD) 


6D 


Adds  two  multi-byte  unsigned  binary  num- 
bers. Both  numbers  are  stored  with  their  least 
significant  bytes  at  the  lowest  address.  The  sum 
replaces  the  addend.  The  length  of  the  numbers 
(in  bytes)  is  255  or  less. 

Procedure:  The  program  clears  the  Carry  flag 
initially  and  adds  the  operands  one  byte  at  a 
time,  starting  with  the  least  significant  bytes. 
The  final  Carry  flag  reflects  the  addition  of  the 
most  significant  bytes.  A  length  of  00  causes  an 
immediate  exit  with  no  addition. 


Registers  Used:  AF,  B,  DE,  HL 

Execution  Time:  46  cycles  per  byte  plus  18  cycles 
overhead 

Program  Size:  11  bytes 

Data  twiemory  Required:  None 

Special  Case:  A  length  of  0  causes  an  immediate 
exit  with  the  addend  unchanged.  The  Carry  flag  is 
cleared. 


Entry  Conditions 

Base  address  of  addend  in  HL 
Base  address  of  adder  in  DE 
Length  of  the  operands  in  bytes  in  B 


Exit  Conditions 

Addend  replaced  by  addend  plus  adder 


Exampie 

1 .     Data:      Length  of  operands  (in  bytes)  =  6 
Addend  =  19D028A193EA,j 
Adder=  29.3EABF059C7,(, 

Result:     Addend  =  4.30ED491EDB  1,5 
Carry  =  0 


Title  Multiple-Precision  Binary  Addition 

Name :  MPBADD 


Purpose:  Add  2  arrays  of  binary  bytes 

Arrayl  =  Arrayl  +  Array2 
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Entry:  Register  pair  HL  =  Base  address  of  array  1 

Register  pair  DE  =  Base  address  of  array  2 
Register  B  =  Length  of  the  arrays 

The  arrays  are  unsigned  binary  numbers  with  a 
maximum  length  of  255  bytes,  ARRAYC03  is  the 
least  significant  byte,  and  ARRAY C LENGTH- ID 
the  most  significant  byte. 

Exit:  Arrayl  !=  Arrayl  +  Array2 

Registers  used;  AF,B,DE,HL 

Time:  46  cycles  per  byte  plus  18  cycles  overhead 

Size:  Program  11  bytes 


MPBADD: 


LOOP: 


! CLEAR  CARRY,   EXIT  IF  ARRAY  LENGTH  IS  0 


LD 

AND 

RET 

LD 

ADC 

LD 

INC 

INC 

DJNZ 

RET 


A,B 
A 
Z 

A, (DE) 
A, (HL) 
(HL),A 
HL 
DE 

LOOP 


ACCUMULATOR 
=  ZERO 


; CLEAR  CARRY,  TEST 
J  RETURN  IF  LENGTH 

;GET  NEXT  BYTE 
;ADD  BYTES 
; STORE  SUM 
[INCREMENT  ARRAY! 
? INCREMENT  ARRAY2 
; CONTINUE  UNTIL  COUNTER  =  0 


POINTER 
POINTER 


SAMPLE  EXECUTION! 


SC6D: 


LD 
LD 
LD 
CALL 


HL.AYl 
DE,AY2 
B,S2AYS 
MPBADD 


HL  =  BASE  ADDRESS  OF  ARRAY  1 
DE  =  BASE  ADDRESS  OF  ARRAY  2 
B  =  LENGTH  OF  ARRAYS  IN  BYTES 
ADD  THE  ARRAYS 


AY  1+0 

56H 

AYl  +  1 

13H 

AY  1+2 

CFH 

AY  1+3 

8AH 

AY  1+4 

67H 

AY  1+5 

45H 

AY  1+6 

23H 

AY  1+7 

OIH 
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JR  SC6D 

SZAYS      EQU  8  ; LENGTH  OF  ARRAYS  IN  BYTES 

AYl ! 

DB  OEFH 

DB  OCDH 

DB  OABH 

DB  089H 

DB  067H 

DB  045H 

DB  023H 

DB  OOIH 


AY2! 

DB  067H 

DB  045H 

DB  023H 

DB  OOIH 

DB  0 

DB  O 

DB  0 

DB  0 


END 


Multiple-Precision  Binary  Subtraction 

(MPBSUB) 


Subtracts  two  multi-byte  unsigned  binary 
numbers.  Both  numbers  are  stored  with  their 
least  significant  bytes  at  the  lowest  address.  The 
difference  replaces  the  minuend.  The  length  of 
the  numbers  (in  bytes)  is  255  or  less. 

Procedure:  The  program  clears  the  Carry  flag 
initially  and  subtracts  the  operands  one  byte  at  a 
time,  starting  with  the  least  significant  bytes. 
The  final  Carry  flag  reflects  the  subtraction  of 
the  most  significant  bytes.  A  length  of  0  causes 
an  immediate  exit  with  no  subtraction. 


Registers  Used:  AF,  B,  DE,  HL 

Execution  Time:  46  cycles  per  byte  plus  22  cycles 

overhead 

Program  Size:  12  bytes 

Data  Memory  Required:  None 

Special  Case:  A  length  of  0  causes  an  immediate 

exit  with  the  minuend  unchanged  (that  is,  the 

difference  is  equal  to  the  minuend).  The  Carry  flag  is 

cleared. 


Entry  Conditions  Exit  Conditions 

Base  address  of  minuend  in  HL  Minuend  replaced  by  minuend  minus  subtrahend 

Base  address  of  subtrahend  in  DE 
Length  of  the  operands  in  bytes  in  B 


Example 


1.     Data:      Length  of  operands  (in  bytes)  =  4 
Minuend  =  2F5BA7C3 16 
Subtrahend  =  I4DF«B8,j 

Result:     Minuend  =  lA7C720B|j 

The  Carry  flag  is  set  to  0  since  no  borrow  is 
necessary. 


Title 
Name: 


Multiple-Precision  Binary  Subtraction 
MPBSUB 


232  ARITHMETIC 


Purpose: 
Entry: 


Exit! 


Subtract  2  arrays  of  binary  bytes 
Minuend  =  minuend  -  subtrahend 

Register  pair  HL  =  Base  address  of  minuend 
Register  pair  DE  =  Ease  address  of  subtrahend 
Register  B  =  Length  of  the  arrays 

The  arrays  are  unsigned  binary  numbers  with  a 
maximum  length  of  255  bytes,  ARRAYCO]  is  the 
least  significant  byte,  and  ARRAY C LENGTH- 1 3 
the  most  significant  byte. 


Minuend  :=  minuend  -  subtrahend 
Registers  used:  AF,B,DE,HL 

Time:  46  cycles  per  byte  plus  22  cycles  overhead 

Sizes  Program  12  bytes 


MPBSUBs 


LOOP: 


; CLEAR  CARRY,   EXIT  IF  ARRAY  LENGTH  IS  0 


LD 
AND 
RET 
EX 


LD 

SBC 

LD 

INC 

INC 

DJNZ 

RET 


A,B 
A 
Z 

DE,HL 


A, (DE) 
A, (HL) 
(DE),A 
DE 
HL 

LOOP 


! CLEAR  CARRY,   TEST  ACCUMULATOR 

; RETURN  IF  LENGTH  =  ZERO 

; SWITCH  ARRAY  POINTERS 

?  SO  HL  POINTS  TO  SUBTRAHEND 

;GET  NEXT  BYTE  OF  MINUEND 

; SUBTRACT  BYTES 

! STORE  DIFFERENCE 

; INCREMENT  MINUEND  POINTER 

; INCREMENT  SUBTRAHEND  POINTER 

f CONTINUE  UNTIL  COUNTER  =  0 


SAMPLE  EXECUTION: 


SC6EJ 


LD 
LD 
LD 

CALL 


HL,AY1 
DE,AY2 
B,SZAYS 
MPBSUB 


HL  =  BASE  ADDRESS  OF  MINUEND 
DE  =  BASE  ADDRESS  OF  SUBTRAHEND 
B  =  LENGTH  OF  ARRAYS  IN  BYTES 
SUBTRACT  THE  ARRAYS 

AY 1+0  =  SSH 

AYl+1  =  SSH 

AY 1+2  =  SSH 
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!  AYl+3  =  8SH 

;  AYl+4  =  67H 

t  AYl+5  =  45H 

;  AYl+6  =  23H 

;  AYl+7  =  OIH 

JR  SC6E 

SZAYS      EQU  8  ;  LENGTH  OF  ARRAYS  IN  BYTES 

AYl! 

DB  OEFH 
DB  OCDH 
DB  OAEH 
DB  089H 
DB  067H 
DB  045H 
DB  023H 
DB  OOIH 

AY2: 

DB  067H 
DB  045H 
DB  023H 
DB  OOIH 
DB  0 
DB  0 
DB  0 
DB  0 

END 


Multiple-Precision  Binary  Multiplication 

(MPBMUL)  6F 


Multiplies  two  multi-byte  unsigned  binary 
numbers.  Botii  numbers  are  stored  with  their 
least  significant  byte  at  the  lowest  address.  The 
product  replaces  the  multiplicand.  The  length  of 
the  numbers  (in  bytes)  is  255  or  less.  Only  the 
less  significant  bytes  of  the  product  are  returned 
to  retain  compatibility  with  other  multiple- 
precision  binary  operations. 

Procedure:  The  program  uses  an  ordinary 
shift -and-add  algorithm,  adding  the  multiplier  to 
the  partial  product  each  time  it  finds  a  1  bit  in  the 
multiplicand.  The  partial  product  and  the  multi- 
plicand are  shifted  through  the  bit  length  plus  I ; 
the  extra  loop  moves  the  final  Carry  into  the 
product.  The  program  maintains  a  full  double- 
length  unsigned  partial  product  in  memory 
locations  starting  at  HIPROD  (more  significant 
bytes)  and  in  the  multiplicand  (less  significant 
bytes).  The  less  significant  bytes  of  the  product 
replace  the  multiplicand  as  it  is  shifted  and 


Registers  Used:  AF,  BC,  DE,  HL. 

Execution  Time:  Depends  on  the  length  of  the 
operands  and  on  the  number  of  I  bits  in  the 
multiplicand  (requiring  actual  additions).  If  the 
average  number  of  1  bits  in  the  multiplicand  is  four 
per  byte,  the  execution  time  is  approximately  728  * 
LENGTH^  +  88.5  *  LENGTH  +  .300  cycles  where 
LENGTH  is  the  number  of  bytes  in  the  operands. 
Program  Size:  104  bytes 

Data  Memory  Required:  261  bytes  anywhere  in 
RAM.  This  is  temporary  storage  for  the  more 
significant  bytes  of  the  product  (2.5.5  bytes  starting  at 
address  HIPROD),  the  loop  counter  (2  bytes  starting 
at  address  COUNT),  the  address  immediately  follow- 
ing the  most  significant  byte  of  the  high  product  (2 
bytes  starting  at  address  ENDHP),  and  the  base 
address  of  the  multiplier  (2  bytes  starting  at  address 
MLIER). 

Special  Case:  A  length  of  0  causes  an  immediate 
exit  with  the  product  equal  to  the  multiplicand.  The 
Carry  flag  is  cleared. 


examined  for  1  bits.  A  0  length  causes  an  exit 
with  no  multiplication. 


Entry  Conditions 


Exit  Conditions 


Base  address  of  multiplicand  in  HL 
Base  address  of  multiplier  in  DE 
Length  of  the  operands  in  bytes  in  B 


Muhiplicand  replaced  by  multiplicand  times 
multiplier 


Example 

1.     Data:      Length  of  operands  (in  bytes)  =  04 
Multiplicand  =  0005D1F7|5 
Multiplier  =  OOOOOABl  If, 

Result:      Multiplicand  =  .3E39D1C7,(, 

Note  that  MPBMUL  returns  only  the  less 
significant  bytes  (that  is,  the  number  of  bytes  in 
the  multiplicand  and  multiplier)  of  the  product 


to  maintain  compatibility  with  other  multiple- 
precision  arithmetic  operations.  The  more  signif- 
icant bits  of  the  product  are  available  starting 
with  their  least  significant  byte  at  address 
HIPROD.  The  user  may  need  to  check  those 
bytes  for  a  possible  overflow  or  extend  the 
operands  with  additional  zeros. 
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Title 
Name: 


Multiple-Precision  Binary  Multiplication 
MPBMUL 


Purpose: 
Entry: 


Exit: 


Multiply  2  arrays  of  binary  bytes 
Multiplicand  =  multiplicand  »  multiplier 

Register  pair  HL  =  Base  address  of  multiplicand 
Register  pair  DE  =  Base  address  of  multiplier 
Register  B  »  Length  of  the  arrays 

The  arrays  are  unsigned  binary  numbers  with  a 
maximum  length  of  255  bytes,  ARRAYCO]  is  the 
least  significant  byte,   and  ARRAY C LENGTH- 1 3 
the  most  significant  byte. 

Multiplicand  :=  multiplicand  *  multiplier 


Registers  used:  AF,BC,DE,HL 


Time: 


Size: 


Assuming  the  average  number  of  1  bits  in  multi- 
plicand is  4  «  length,  then  the  time  is  approxi- 
mately 

(728  »  length*2)  +  <883  «  length)  +  300  cycles 

Program  104  bytes 
Data        261  bytes 


MPBMUL s 

jEXIT  IF  LENGTH  IS  ZERO 
LD  A,B 

AND  A  5  IS  LENGTH  OF  ARRAYS  =  0  ? 

RET  Z  jYES.  EXIT 

jMAKE  POINTERS  POINT  TO  END  OF  OPERANDS 

LD  C,B  sBC  =  LENGTH 

LD  B,0 

ADD  HL,BC  SEND  =  BASE  +  LENGTH 

EX  DE,HL  jDE  POINTS  TO  END  OF  MULTIPLICAND 

LD  (MUERJ.HL  jSAVE  ADDRESS  OF  MULTIPLIER 

LD  HL, HI PROD 

ADD  HL,  BC 

LD  (ENDHP>,HL  jSAVE  ADDRESS  AT  END  OF  HI PROD 

J  SET  COUNT  TO  NUMBER  OF  BITS  IN  ARRAY  PLUS  1 
?  COUNT  !=  (LENGTH  «  8)  +  I 
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2ER0PD: 
2ER0LP: 


LD 

L,C 

JMOVE  LENGTH  TO  HL 

LD 

H,  B 

ADD 

HL,HL 

; LENGTH  «  8,   SHIFT  LEFT  3  TIMES 

ADD 

HL,HL 

ADD 

HL,HL 

rlL. 

;  ADD  1 

LD 

t COUNT ),HL 

SSAVE  NUMBER  OF  BITS  TO  DO 

;  ZERO 

HIGH  PRODUCT 

ARRAY 

LD 

B,C 

?B  =  LENGTH  IN  BYTES 

LD 

HL, HI PROD 

sGET  ADDRESS  OF  HIPROD 

LD 

(HL>,0 

; STORE  0 

INC 

HL 

DJN2 

ZEROLP 

; CONTINUE  UNTIL  HIPROD  ARRAY  IS 

LOOP: 


SRPLPs 


; MULTIPLY  USING  SHIFT  AND  ADD  ALGORITHM 

"^ND  A  ;  CLEAR  CARRY  FIRST  TIME  THROUGH 

J  SHIFT  CARRY  INTO  HIPROD  ARRAY  AND  LEAST  SIGNIFICANT 

T  BIT  OF  HIPROD  ARRAY  TO  CARRY 

LD  E,C  ;GET  LENGTH  IN  BYTES 

LD  HL, (ENDHP)  ;GET  LAST  BYTE  OF  HIPROD  +  1 


DEC  HL 
RR  (HL) 
DJNZ  SRPLP 


J  BACK  UP  TO  NEXT  BYTE 

; CONTINUE  UNTIL  INDEX  =  0 


SRAlLPs 


; SHIFT  CARRY  (NEXT  BIT  OF  LOWER  PRODUCT)   INTO  MOST 
J   SIGNIFICANT  BIT  OF  MULTIPLICAND. 

!   THIS  ALSO  SHIFTS  NEXT  BIT  OF  MULTIPLICAND  TO  CARRY 

LD  L,E  sHL  =  ADDRESS  OF  END  OF  MULTIPLICAND 

LD  H,D 

LD  B,C  ;E  =  LENGTH  IN  BYTES 


DEC 

RR 

DJNZ 


HL 

(HL) 

SRAILP 


;BACK  UP  TO  NEXT  BYTE 
; CONTINUE  UNTIL  DONE 


ADDLP: 


;IF  NEXT  BIT  OF  MULTIPLICAND  IS  1  THEN 
?     ADD  MULTIPLIER  TO  HIPROD  ARRAY 

JP  NCDECCNT  jJUMP  IF  NEXT  BIT  IS  ZERO 

J  ADD  MULTIPLIER  TO  HIPROD 

PUSH        DE  ;SAVE  ADDRESS  OF  MULTIPLICAND 

LD  DE, (MLIER)  ;DE  =  ADDRESS  OF  MULTIPLIER 

LD  HL, HIPROD  sHL  =  ADDRESS  OF  HIPROD 

LD  B,C  jB  =  LENGTH  IN  BYTES 

AND  A  ! CLEAR  CARRY 

LD  A,  (DE)  J  GET  NEXT  MULTIPLIER  BYTE 

ADC  A, (HL)  ; ADD  TO  HIPROD 

LD  (HL),A  ? STORE  NEW  HIPROD 

INC  DE 
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DECCNT: 


INC  HL 
DJNZ  ADDLP 
POP  DE 


; CONTINUE  UNTIL  DONE 

; RESTORE  ADDRESS  OF  MULTIPLICAND 


{DECREMENT  BIT  COUNTER,  EXIT  IF  DONE 
;  DOES  NOT  CHANGE  CARRY! 


LD 

DEC 

LD 

JP 

PUSH 

LD 

AND 

JP 

DEC 

LD 

POP 

JP 


A, (COUNT) 
A 

(COUNT), A 

NZ,LOOP 

AF 

A, (COUNT+1) 
A 

Z,EXIT 
A 

(COUNT+1), A 
AF 

LOOP 


BRANCH  IF  LSB  OF  COUNT  NOT  ZERO 
SAVE  CARRY 

GET  HIGH  BYTE  OF  COUNT 

IS  IT  ZERO? 

EXIT  IF  SO 
DECREMENT  HIGH  BYTE  OF  COUNT 

; RESTORE  CARRY 
; CONTINUE 


EXIT: 


POP 
RET 


AF 


;DROP  PSW  FROM  STACK 
; RETURN 


COUNT: 
ENDHP: 
MLIERs 
HI PROD ! 


;DATA 

DS 

DS 

DS 

DS 


2 

255 


; TEMPORARY  FOR  LOOP  COUNTER 

; ADDRESS  OF  LAST  BYTE  OF  HI PROD  + 

! ADDRESS  OF  MULTIPLIER 

;HIGH  PRODUCT  BUFFER 


SAMPLE  EXECUTION: 


SC6F: 

LD  HL,AY1  ;HL  =  ADDRESS  OF  MULTIPLICAND 

LD  DE,AY2  jDE  =  ADDRESS  OF  MULTIPLIER 

LD  E,SZAYS  jE  =  LENGTH  OF  OPERANDS  IN  BYTES 

CALL        MPBMUL  ; MULTIPLE-PRECISION  BINARY  MULTIPLY 

; RESULT  OF  12345H  «  1234H  =  14B60404H 

;    IN  MEMORY  AYl  =  04H 

;  AYl+1       =  04H 

;  AYl+2      =  B6H 

;  AYl+3      =  14H 

;  AYl+4       =  OOH 

;  AYl+5       =  OOH 

;  AYl+6       =  OOH 

JR  SC6F 

SZAYS      EQU  7  ; LENGTH  OF  OPERANDS  IN  BYTES 
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DB  045H 

DB  023H 

DB  OOIH 

DB  O 

DB  0 

DB  O 

DB  0 


AY2! 

DB  034H 

DB  012H 

DB  0 

DB  0 

DB  0 

DB  0 

DB  0 

END 


Multiple-Precision  Binary  Division 

(MPBDIV) 


6G 


Divides  two  multi-byte  unsigned  binary 
numbers.  Both  numbers  are  stored  with  their 
least  significant  byte  at  the  lowest  address.  The 
quotient  replaces  the  dividend;  the  address  of 
the  least  significant  byte  of  the  remainder  is  in 
HL.  The  length  of  the  numbers  (in  bytes)  is  255 
or  less.  The  Carry  flag  is  cleared  if  no  errors 
occur;  if  a  divide  by  0  is  attempted,  the  Carry 
flag  is  set  to  I,  the  dividend  is  left  unchanged, 
and  the  remainder  is  set  to  0. 

Procedure:  The  program  divides  with  the 


usual  shift-and-subtract  algorithm,  shifting  quo- 
tient and  dividend  and  placing  a  1  bit  in  the 
quotient  each  time  a  trial  subtraction  is  success- 
ful. An  extra  buffer  holds  the  resuU  of  the  trial 
subtraction;  that  buffer  is  simply  switched  with 
the  buffer  holding  the  dividend  if  the  trial 
subtraction  is  successful.  The  program  exits 
immediately,  setting  the  Carry  flag,  if  it  finds  the 
divisor  to  be  0.  The  Carry  flag  is  cleared 
otherwise. 


Rtgisters  Used:  AF;  BC,  DE,  HL 

Execution  Time;  Depends  on  the  length  of  the 
operands  and  on1be  number  of  1  bits  in  the  quotient 
(requiring  a  buffer  switch).  If  the  average  number  of 
1  bits  in  tlie  quotient  is  4  per  bvte,  the  execution  time 
is  approximately  1 176  *  LENG  T  H2+  2038  *  LENGTH 
+  515  cycles  where  LENGT  H  is  the  number  of  bytes 
in  the  operands. 

Program  Size:  161  bytes 

Data  Memory  Required;  522  bytes  anywhere  in 
RAM.  This  is  temporary  storage  for  the  high  divi- 
dend (255  bytes  starting  at  address  H 1  DE  1 ),  t  lie  result 
of  the  trial  subtraction  (255  bytes  starting  at  address 
H1DE2),  the  base  address  of  the  dividend  (2  bytes 


starting  at  address  DVEND),  the  base  address  of  the 
divisor  (2  bytes  starting  at  address  DYSOR),  pointers 
to  the  two  temporary  buffers  for  the  high  dividend  (2 
bytes  starting  at  addresses  HDEPTR  and  ODER  I  R. 
respectively),  a  loop  counter  (2  bytes  starting  at 
address  COUNT),  and  a  subtraction  loop  counter  ( I 
byte  at  address  SUBCNT). 

Speciai  Cases: 

1 .  A  length  of  0  causes  an  immediate  exit  with  the 
Carry  flag  cleared,  the  quotient  equal  to  the  original 
dividend,  and  the  remainder  undefined. 

2,  A  divisor  of  0  causes  an  exit  with  the  Carry  flag 
set  to  I,  the  quotient  equal  to  the  original  dividend, 
and  the  remainder  equal  to  0. 


Entry  Conditions 

Base  address  of  dividend  in  HL 
Base  address  of  divisor  in  DE 
Length  of  the  operands  in  bytes  in  B 


Exit  Conditions 

Dividend  replaced  by  dividend  divided  by  divisor 
If  the  divisor  is  non-zero,  Carry  =  0  and  the 

result  is  normal. 
If  the  divisor  is  0,  Carry  =  1,  the  dividend  is 

unchanged,  and  the  remainder  is  0. 
The  remainder  is  stored  starting  with  its  least 

significant  byte  at  the  address  in  HL. 
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Example 

1,     Data:      Length  of  operands  (in  bytes)  =  03 
Divisor  =  000F45|5 
Dividend  =  35  A2F7, 6 
Result:     Dividend  =  000383,5 

Remainder  (starting  at  address  in  HL)  = 
0003 A8 ,6 

Carry  flag  is  0  to  indicate  no  divide-by-0  error. 


Title 
Name: 


Multiple-Precision  Binary  Division 
MPBDIV 


Purpose: 
En  t  r  y : 


Exit: 


Registers  used: 
Time: 


Divide  2  arrays  of  binary  bytes 
Dividend  =  dividend  /  divisor 

Register  pair  HL  =  Base  address  of  dividend 
Register  pair  DE  =  Base  address  of  divisor 
Register  E  =  Length  of  operands  in  bytes 

The  arrays  are  unsigned  binary  numbers  with  a 
maximum  length  of  255  bytes,  ARRAYC03  is  the 
least   significant  byte,   and  ARRAY C LENGTH- 1 ] 
the  most  significant  byte. 

Dividend  :=  dividend  /  divisor 

Register  pair  HL  =  Base  address  of  remainder 

If  no  errors  then 

carry  :=  0 
ELSE 

divide-by-0  error 
carry  :=  1 
dividend  unchanged 
remainder  :=  0 

AF,EC,DE,HL 

Assuming  there  are  length/2  1  bits  in  the 

quotient  then  the  time  is  approximately 

(1176  »  length*2)  +  (2038  »  length)  +  515  cycles 


Size: 


Program  161  bytes 
Data        522  bytes 
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jTEST  LENGTH  OF  OPERANDS,    INITIALIZE  POINTERS 

MPBDIV: 


ZEROLP: 


CHKOLP: 


LD 

A.B 

OR 

A 

; IS  LENGTH  OF  ARRAYS  =  0? 

JP 

Z.OKEXIT 

jEXIT  IF  SO 

LD 

(DVEND),HL 

jSAVE  BASE  ADDRESS  OF  DIVIDEND 

LD 

<DVS0R.1,DE 

;SAVE  EASE  ADDRESS  OF  DIVISOR 

LD 

C,B 

;C  =  LENGTH  OF  OPERANDS 

5  SET 

COUNT  TO  NUMBER 

OF  BITS  IN  THE  ARRAYS 

?   COUNT  :=  (LENGTH  « 

8)  +  1 

LD 

L,C 

jHL  =  LENGTH  IN  BYTES 

LD 

H,0 

ADD 

HL.HL 

; LENGTH  «  2 

ADD 

HL,HL 

J  LENGTH  K  4 

ADD 

HL,HL 

;  LENGTH  *i  8 

INC 

HL 

; LENGTH  k  8  +  1 

LD 

(COUNT)  ,HL 

J  SAVE  BIT  COUNT 

jZERC 

1  BOTH  HIGH  DIVIDEND  ARRAYS 

LD 

HL,HIDE1 

;HL  =  ADDRESS  OF  HIDEl 

LD 

DE,HIDE2 

jDE  =  ADDRESS  OF  HIDE 2 

LD 

B,C 

jB  =  LENGTH  IN  BYTES 

SUE 

A 

;GET  0  FOR  FILL 

LD 

(HL) , A 

sZERO  HIDEl 

LD 

(DE) , A 

;   AND  HIDE2 

INC 

HL 

INC 

DE 

DJNZ 

ZEROLP 

f  SET 

HIGH  DIVIDEND  POINTER  TO  HIDEl 

LD 

HL,HIDE1 

LD 

(HDEPTR),HL 

;SET 

OTHER  HIGH  DIVIDEND  POINTER  TO  HIDE2 

LD 

HL,HIDE2 

LD 

(ODEPTR),HL 

! CHECK  IF  DIVISOR  IS 

ZERO  BY  LOGICALLY  ORING  ALL  BYTES 

LD 

HL, (DVSOR) 

;HL  =  ADDRESS  OF  DIVISOR 

LD 

B,C 

jB  =  LENGTH  IN  BYTES 

SUB 

A 

; START  LOGICAL  OR  AT  0 

OR 

(HL) 

;0R  NEXT  BYTE 

INC 

HL 

! INCREMENT  TO  NEXT  BYTE 

DJNZ 

CHKOLP 

; CONTINUE  UNTIL  ALL  BYTES  ORED 

OR 

A 

;SET  FLAGS  FROM  LOGICAL  OR 

JR 

Z.EREXIT 

! ERROR  EXIT  IF  DIVISOR  IS  0 

; DIVIDE  USING  TRIAL  SUBTRACTION  ALGORITHM 

OR  A  ; CLEAR  CARRY  FIRST  TIME  THROUGH 
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LOOP: 


SLLPl: 


;C  =  LENGTH 

SDE  =  ADDRESS  OF  DIVISOR 
SCARRY  =  NEXT  BIT  OF  QUOTIENT 

J  SHIFT  CARRY  INTO  LOWER  DIVIDEND  ARRAY  AS  NEXT  BIT  OF  QUOTIENT 
5  AND  MOST  SIGNIFICANT  BIT  OF  LOWER  DIVIDEND  TO  CARRY 
LD  B,C  ;B  =  NUMBER  OF  BYTES  TO  ROTATE 

LD  HL,(DVEND)  ;HL  =  ADDRESS  OF  DIVIDEND 

RL  (HL)  ; ROTATE  BYTE  OF  DIVIDEND  LEFT 

INC  HL  jNEXT  BYTE 

DJNZ         SLLPl  ; CONTINUE  UNTIL  ALL  BYTES  SHIFTED 


; DECREMENT  BIT  COUNTER  AND  EXIT  IF  DONE 
f CARRY  IS  NOT  CHANGED! 

DECCNTs 

LD  A, I COUNT) 

DEC  A 

LD  (COUNT), A 

JR  NZ.CONT  ; CONTINUE  IF  LOWER  BYTE  NOT  ZERO 

LD  A,(C0UNT+1) 
DEC  A 

LD  (C0UNT+1),A 

JP  M,OKEXIT  jEXIT  WHEN  COUNT  BECOMES  NEGATIVE 


! SHIFT  CARRY  INTO  LSE  OF  UPPER  DIVIDEND 

CONT: 

LD  HL, (HDEPTR)  jHL  =  CURRENT  HIGH  DIVIDEND  POINTER 

LD  B,C  ;B  =  LENGTH  IN  BYTES 

SLLP2! 

RL  (HL)  jROTATE  BYTE  OF  UPPER  DIVIDEND 

INC  HL  J  INCREMENT  TO  NEXT  BYTE 

DJNZ  SLLP2  5 CONTINUE  UNTIL  ALL  BYTES  SHIFTED 


; SUBTRACT  DIVISOR  FROM  HIGH  DIVIDEND,  PLACE  DIFFERENCE  IN 


SUBLPs 


J  OTHER 

HIGH  DIVIDEND 

ARRAY 

PUSH 

BC 

;SAVE  LENGTH 

LD 

A,C 

LD 

(SUBCNT) , A 

! SUBCNT  =  LENGTH  IN  BYTES 

LD 

BC, (ODEPTR) 

;BC  =  OTHER  DIVIDEND 

LD 

DE, (HDEPTR) 

;DE  =  HIGH  DIVIDEND 

LD 

HL, (DVSOR) 

;HL  =  DIVISOR 

OR 

A 

(CLEAR  CARRY 

LD 

A, (DE) 

;NEXT  BYTE  OF  HIGH  DIVIDEND 

SBC 

A,  (HL) 

! SUBTRACT  DIVISOR 

LD 

(BC) , A 

jSAVE  IN  OTHER  HIGH  DIVIDEND 

INC 

HL 

; INCREMENT  POINTERS 

INC 

DE 

INC 

BC 

LD 

A, (SUBCNT) 

; DECREMENT  COUNT 

DEC 

A 

LD 

(SUBCNT), A 

JR 

NZ.SUBLP 

! CONTINUE  UNTIL  DIFFERENCE  COMPLETE 

POP 

BC 

; RESTORE  LENGTH 
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EREXIT: 


OKEXIT: 


;IF  CARRY  IS  1,   HIGH  DIVIDEND  IS  LESS  THAN  DIVISOR 
;   SO  NEXT  BIT  OF  QUOTIENT  IS  0.    IF  CARRY  IS  0 
!   NEXT  BIT  OF  QUOTIENT  IS  1  AND  WE  REPLACE  DIVIDEND 
J  WITH  REMAINDER  BY  SWITCHING  POINTERS. 


CCF 

JR 
LD 
LD 
LD 

LD 


NCLOOP 
HL, <HDEPTR) 
DE, (ODEPTR) 
(ODEPTR.J,HL 
(HDEPTR),DE 


5 COMPLEMENT  BORROW  SO  IT  EQUALS 

5   NEXT  BIT  OF  QUOTIENT 

J  JUMP  IF  NEXT  BIT  OF  QUOTIENT  0 

; OTHERWISE  EXCHANGE  HDEPTR  AND  ODEPTR 


jCONTINUE  WITH  NEXT  BIT  OF  QUOTIENT  1   (CARRY  =  1) 
JP  LOOP 

SSET  CARRY  TO  INDICATE  DIVIDE-BY-ZERO  ERROR 

J  SET  CARRY,    INVALID  RESULT 


SCF 
JP 


EXIT 


! CLEAR  CARRY  TO  INDICATE  NO  ERRORS 

OR  A  ; CLEAR  CARRY,   VALID  RESULT 


! ARRAY  1   IS  QUOTIENT 

f HDEPTR  CONTAINS  ADDRESS  OF  REMAINDER 
EXIT:       LD  HL, (HDEPTR)  ;HL  =  BASE  ADDRESS  OF  REMAINDER 

RET 


;DATA 


DVENDs 

DS 

2 

DVSOR: 

DS 

2 

HDEPTR: 

DS 

2 

ODEPTR! 

DS 

2 

COUNT: 

DS 

2 

SUBCNT: 

DS 

1 

HIDEl! 

DS 

255 

HIDE2! 

DS 

255 

ADDRESS  OF  DIVIDEND 
ADDRESS  OF  DIVISOR 

ADDRESS  OF  CURRENT  HIGH  DIVIDEND  ARRAY 
ADDRESS  OF  OTHER  HIGH  DIVIDEND  ARRAY 
TEMPORARY  FOR  LOOP  COUNTER 
SUBTRACT  LOOP  COUNT 
HIGH  DIVIDEND  BUFFER  1 
HIGH  DIVIDEND  BUFFER  2 


SAMPLE  EXECUTION! 


SC6G! 


LD 
LD 
LD 
CALL 


HL, AYl 
DE, AY2 
B,SZAYS 
MPEDIV 


HL  =  BASE  ADDRESS  OF  DIVIDEND 
DE  =  BASE  ADDRESS  OF  DIVISOR 
B  =  LENGTH  OF  ARRAYS  IN  BYTES 
MULTIPLE-PRECISION  BINARY  DIVIDE 
RESULT  OF  14B60404H  /  1234H  =  12345H 
IN  MEMORY  AYl  =  45H 

AYl+1       =  23H 

AYl+2      =  OIH 


244  ARITHMETIC 


5  AYl+3       =  OOH 

;  AYl+4       =  OOH 

?  AYl+5       =  OOH 

5  AYl+6       =  OOH 

JR  SC6G 

S2AYS      EQU  7  ; LENGTH  OF  ARRAYS  IN  BYTES 

AYls 

DB  004H 
DB  004H 
OB  0B6H 
DB  01 4H 

DB  0 
DB  O 
DB  O 

AY2! 

DB  034H 
DB  012H 
DB  O 
OB  O 
DB  O 
DB  O 
DB  O 


END 


Multiple-Precision  Binary  Comparison 

(MPBCMP)  6H 


Compares  two  multi-byte  unsigned  binary 
numbers  and  sets  the  Carry  and  Zero  flags 
appropriately.  The  Zero  flag  is  set  to  1  if  the 
operands  are  equal  and  to  0  if  they  are  not  equal. 
The  Carry  flag  is  set  to  1  if  the  subtrahend  is 
larger  than  the  minuend;  the  Carry  flag  is 
cleared  otherwise.  Thus,  the  flags  are  set  as  if  the 
subtrahend  had  been  subtracted  from  the 
minuend. 

Procedure:  The  program  compares  the  oper- 
ands one  byte  at  a  time,  starting  with  the  most 
significant  bytes  and  continuing  until  it  finds 
corresponding  bytes  that  are  not  equal.  If  all  the 
bytes  are  equal,  it  exits  with  the  Zero  flag  set  to 
1 .  Note  that  the  comparison  works  through  the 
operands  starting  with  the  most  significant 
bytes,  whereas  the  subtraction  (Subroutine  6E) 
starts  with  the  least  significant  bytes. 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  44  cycles  per  byte  that  must  be 
examined  plus  approximately  60  cycles  overhead. 
That  is,  the  program  continues  until  it  finds  cor- 
responding bytes  that  are  not  the  same;  each  pair  of 
bytes  it  must  examine  requires  44  cycles. 

Examples: 

1 .  Comparing  two  6-byte  numbers  that  are  equal: 

44  *  6  f  60  =  .■524  cycles 

2.  Comparing  two  8-byte  numbers  that  differ  in 
the  next  to  most  significant  bytes: 

44  *  2  +  60  =  148  cycles 

Program  Size:  19  bytes 

Data  Memory  Required:  None 

Special  Case:  A  length  of  0  causes  an  immediate 
exit  with  the  Carry  flag  cleared  and  the  Zero  flag  set 
to  1. 


Entry  Conditions 

Base  address  of  minuend  in  HL 
Base  address  of  subtrahend  in  DE 
Length  of  the  operands  in  bytes  in  B 


Exit  Conditions 

Flags  set  as  if  subtrahend  had  been  subtracted 
from  minuend. 

Zero  flag  =  1  if  subtrahend  and  minuend  are 
equal,  0  if  they  are  not  equal. 

Carry  flag  —  1  if  subtrahend  is  larger  than 
minuend  in  the  unsigned  sense,  0  if  it  is  less 
than  or  equal  to  the  minuend. 


Exampies 

1 .     Data:      Length  of  operands  (in  bytes)  =  6 
Subtrahend  =  19D028A193EA|j 
Minuend  =  4E67BC15A266|6 

Result:     Zero  flag  =  0  (operands  are  not  equal) 

Carry  flag  =  0  (subtrahend  is  not  larger  than 
minuend) 


3.     Data:     Length  of  operands  (in  bytes)  =  6 
Subtrahend  =  19D028A193EA,6 
Minuend  =  0F37E5991D7C,6 

Result:     Zero  flag  =  0  (operands  are  not  equal) 

Carry  flag  =  I  (subtrahend  is  larger  than 
minuend) 
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2.     Data:      Length  of  operands  (in  bytes)  =  6 
Subtrahend  =  19D028A193EA|5 
Minuend  =  19D028A193EA|j, 

Resuh:     Zero  flag  =  1  (operands  are  equal) 

Carry  flag  =  0  (subtrahend  is  not  larger  than 
minuend) 


Title 
Name: 


Multiple-Precision  Binary  Comparison 
MPBCMP 


Purpose: 


Entry: 


Exit: 


Compare  2  arrays  of  binary  bytes  and  return 
the  Carry  and  Zero  flags  set  or  cleared 

Register  pair  HL  =  Base  address  of  minuend 
Register  pair  DE  =  Base  address  of  subtrahend 
Register  B  =  Length  of  operands  in  bytes 

The  arrays  are  unsigned  binary  numbers  with 
maximum  length  of  255  bytes,  ARRAYCOl  is  the 
least  significant  byte,  and  ARRAYCLENGTH-n 
the  most  significant  byte. 

IF  minuend  =  subtrahend  THEN 
C=0, Z=l 

IF  minuend  >  subtrahend  THEN 

C=0,Z=0 
IF  minuend  <  subtrahend  THEN 

C=1,Z=0 


Registers  used:  AF,BC,DE,HL 


Time: 


Size: 


44  cycles  per  byte  that  must  be  examined  plus 
60  cycles  overhead 

Program  19  bytes 


MPBCMP: 


JTEST  LENGTH  OF  OPERANDS,   SET  POINTERS  TO  MSB'S 
LD  A,  B 

OR  A  -IS  LENGTH  OF  ARRAYS  =  C 

RET  Z  J  YES,   EXIT  WITH  C=0,  Z=l 

LD  C,B  ;BC  =  LENGTH 
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LOOP: 


LD 
ADD 
EX 
ADD 
LD 
OR 


B,0 
HL,BC 
DE.HL 
HL,BC 
B,C 
A 


DE  POINTS  TO  END  OF  MINUEND 
HL  POINTS  TO  END  OF  SUBTRAHEND 
E  =  LENGTH 

CLEAR  CARRY  INITIALLY 
! SUBTRACT  BYTES,   STARTING  WITH  MOST  SIGNIFICANT 
jEXIT  WITH  FLAGS  SET  IF  CORRESPONDING  BYTES  NOT  EQUAL 


DEC 

DEC 

LD 

SBC 

RET 

DJNZ 
RET 


HL 

DE 

A, (DE) 
A, (HL) 
NZ 

LOOP 


5 BACK  UP  TO  LESS  SIGNIFICANT  BYTE 

;GET  NEXT  BYTE  OF  MINUEND 
; SUBTRACT  BYTE  OF  SUBTRAHEND 
; RETURN  IF  NOT  EQUAL  WITH  FLAGS 
;  SET 

; CONTINUE  UNTIL  ALL  BYTES  COMPARED 
J  EQUAL,  RETURN  WITH  C=0,  Z=l 


SAMPLE  EXECUTION! 


SC6H: 


LD 
LD 
LD 

CALL 


HL,AY1 
DE,AY2 
B.SZAYS 
MPBCMP 


sHL  =  BASE  ADDRESS  OF  MINUEND 

jDE  =  BASE  ADDRESS  OF  SUBTRAHEND 

;B  =  LENGTH  OF  OPERANDS  IN  BYTES 

; MULTIPLE-PRECISION  BINARY  COMPARISON 

! RESULT  OF  COMP ARE ( 765432 1 H, 1234567H)  IS 

;  C=0,Z=0 


SZAYS 
AYl: 


JR 

EQU 

DB 
DB 
DB 
DB 
DB 
DB 
DB 


SC6H 


021H 

043H 

065H 

007H 

O 

O 

O 


J  LENGTH  OF  OPERANDS  IN  BYTES 


AY2: 


DB 
DB 
OB 
DB 
DB 
DB 
OB 


067H 

045H 

023H 

OOIH 

O 

0 

O 


END 


Multiple-Precision  Decimal  Addition 

(MPDADD) 


6 


Adds  two  multi-byte  unsigned  decimal  num- 
bers. Both  numbers  are  stored  with  their  least 
significant  digits  at  the  lowest  address.  The  sum 
replaces  the  addend.  The  length  of  the  numbers 
(in  bytes)  is  255  or  less. 

Procedure:  The  program  first  clears  the  Carry 
flag  and  then  adds  the  operands  one  byte  (two 
digits)  at  a  time,  starting  with  the  least  significant 
digits.  The  sum  replaces  the  addend.  A  length  of 
00  causes  an  immediate  exit  with  no  addition. 
The  final  Carry  flag  reflects  the  addition  of  the 
most  significant  digits. 


Registers  Used:  AF,  B,  DE,  HL 

Execution  Time:  50  cycles  per  byte  plus  18  cycles 
overhead 

Program  Size:  12  bytes 

Data  IVIemory  Required:  None 

Special  Case:  A  length  of  0  causes  an  immediate 
exit  with  the  addend  unchanged  and  the  Carry  flag 
cleared. 


Entry  Conditions 

Base  address  of  addend  in  HL 

Base  address  of  adder  in  DE 

Length  of  the  operands  in  bytes  in  register  B 


Exit  Conditions 

Addend  replaced  by  addend  plus  adder 


Exampie 

1 .     Data:      Length  of  operands  (in  bytes)  =  6 
Addend  =  196028819315,6 
Adder  =  29.3471605987,6 

Result:     Addend  =  489500425302,6 
Carry  =  0 


Title  iiultiple-Precision  Decimal  Addition 

Names  MPDADD 
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MPDADDs 


LOOP: 


Purpose:  Add  2  arrays  of  BCD  bytes 

Arrayl  =  Arrayl  +  Array2 

Entry:  Register  pair  HL  =  Base  address  of  array  1 

Register  pair  DE  =  Base  address  of  array  2 
Register  B  =  Length  of  arrays  in  bytes 

The  arrays  are  unsigned  BCD  numbers  with  a 
maximum  length  of  255  bytes,   ARRAYC03  is  the 
least  significant  byte,  and  ARRAY t LENGTH- 13 
the  most  significant  byte. 

Exit:  Arrayl  :=  Arrayl  +  Array2 

Registers  used;  A,B,DE,F,HL 

Time:  50  cycles  per  byte  plus  18  cycles  overhead 

Size:  Program  12  bytes 


5  TEST  ARRAY  LENGTH  FOR  ZERO,   CLEAR  CARRY 
LD  A,B 

OR  A  5  TEST  LENGTH  AND  CLEAR  CARRY 

RET  Z  jEXlT  IF  LENGTH  IS  O 

?ADD  OPERANDS  2  DIGITS  AT  A  TIME 
5     NOTE  CARRY  IS  0  INITIALLY 

LD  A,  (DE) 

ADC  A,(HL)  ! ADD  NEXT  BYTES 

DAA  J  CHANGE  TO  DECIMAL 

LD  (HL),A  ! STORE  SUM 

INC  HL  INCREMENT  TO  NEXT  BYTE 

INC  DE 

DJNZ  LOOP  J  CONTINUE  UNTIL  ALL  BYTES  SUMMED 

RET 


SAMPLE  EXECUTION: 


SC6l! 


LD 
LD 
LD 
CALL 


HL.AYl 
DE,AY2 
B.SZAYS 
MPDADD 


HL  =  BASE  ADDRESS  OF  ARRAY  1 
DE  =  BASE  ADDRESS  OF  ARRAY  2 
B  =  LENGTH  OF  ARRAYS  IN  BYTES 
MULTIPLE-PRECISION  BCD  ADDITION 
RESULT  OF  1234567  +  1234567  =  2469134 
IN  MEMORY  AYl  =  34H 

AYl+1       =  91H 

AY 1+2      =  46H 
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!  AYl+3      =  02H 

5  AYl+4      =  OOH 

f  AYl+5      =  OOH 

!  AY 1+6      =  OOH 

JR  SC6I 

SZAYS      EQU  7  5 LENGTH  OF  ARRAYS  IN  BYTES 

AYl : 

DB  067H 
DB  045H 
DB  023H 
DB  00 IH 

DB  0 
DB  0 
DB  0 

AY2: 

DB  067H 
DB  045H 
DB  023H 
DB  OOIH 
DB  0 
DB  0 
DB  0 


END 


Mylflple-Preclsion  Decimal  Subtraction 

(MPDSUB)  6J 


Subtracts  two  multi-byte  unsigned  decimal 
numbers.  Both  numbers  are  stored  with  their 
least  significant  digits  at  the  lowest  address.  The 
difference  replaces  the  minuend.  The  length  of 
the  numbers  (in  bytes)  is  255  or  less. 

Procedure:  The  program  first  clears  the  Carry 
flag  and  then  subtracts  the  subtrahend  from  the 
minuend  one  byte  (two  digits)  at  a  time,  starting 
with  the  least  significant  digits.  A  length  of  0 
causes  an  immediate  exit  with  no  subtraction. 
The  final  Carry  flag  reflects  the  subtraction  of 
the  most  significant  digits. 


Registers  Used:  A,  B,  DE,  F,  HL 

Execution  Time:  50  cycles  per  byte  plus  22  cycles 

overhead 

Program  Size:  13  bytes 

Data  Memory  Required:  None 

Special  Case:  A  length  of  0  causes  an  immediate 
exit  with  the  minuend  unchanged  (that  is,  the 
difference  is  equal  to  the  minuend).  The  Carry  flag  is 
cleared. 


Entry  Conditions  Exit  Conditions 

Base  address  of  minuend  in  HL  Minuend  replaced  by  minuend  minus  subtrahend 

Base  address  of  subtrahend  in  DE 
Length  of  the  operands  in  bytes  in  B 


Exampie 


Data:      Length  of  operands  (in  bytes)  =  6 
Minuend  =  293471605987,6 
Subtrahend  =  1960288193151  if, 

Result:      Minuend  =  097442786672,6 

Carry  =  0,  since  no  borrow  is  necessary 


Title  Multiple-Precision  Decimal  Subtraction 

Name:  MPDSUB 
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MPDSUEs 


LOOP: 


Purposes  Subtract  2  arrays  of  BCD  bytes 

Minuend  =  minuend  -  subtrahend 

Entry:  Register  pair  HL  =  Base  address  of  minuend 

Register  pair  DE  =  Base  address  of  subtrahend 
Register  B  =  Length  of  arrays  in  bytes 

The  arrays  are  unsigned  BCD  numbers  with  a 
maximum  length  of  255  bytes,  ARRAYC03  is  the 
least  significant  byte,   and  ARRAYCLENGTH-1 3 
the  most  significant  byte. 

Exit:  Minuend  :=  minuend  -  subtrahend 

Registers  used:  A,B,DE,F,HL 

Times  50  cycles  per  byte  plus  22  cycles  overhead 

Sizes  Program  13  bytes 


J  TEST  ARRAY  LENGTH  FOR  ZERO,  CLEAR  CARRY 
LD  A,B 

OR  A  J  TEST  ARRAY  LENGTH,   CLEAR  CARRY 

RET  Z  J  EXIT  IF  LENGTH  IS  O 

EX  DE,HL  fHL  =  SUBTRAHEND 

jDE  =  MINUEND 
; SUBTRACT  OPERANDS  2  DIGITS  AT  A  TIME 
;  NOTE  CARRY  IS  INITIALLY  0 

LD  A, (DE)  ;GET  BYTE  OF  MINUEND 

SBC  A,(HL)  ; SUBTRACT  BYTE  OF  SUBTRAHEND 

DAA  f CHANGE  TO  DECIMAL 

LD  (DE.>,A  5  STORE  BYTE  OF  DIFFERENCE 

INC  HL  ! INCREMENT  TO  NEXT  BYTE 

INC  DE 

DJNZ         LOOP  ; CONTINUE  UNTIL  ALL  BYTES  SUBTRACTED 

RET 


SAMPLE  EXECUTIONS 


SC6JS 


LD 
LD 
LD 
CALL 


HL,AY1 
DE, AY2 
B,SZAYS 
MPDSUB 


;HL  =  BASE  ADDRESS  OF  MINUEND 

;DE  =  BASE  ADDRESS  OF  SUBTRAHEND 

jB  =  LENGTH  OF  ARRAYS  IN  BYTES 

f MULTIPLE-PRECISION  BCD  SUBTRACTION 

; RESULT  OF  2469134  -  1234567  =  1234567 

J    IN  MEMORY  AYl  =  67H 

!  AYl+1       =  45H 
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5  AYl+2       =  23H 

J  AYl+3      =  OIH 

f  AYl+4      =  OOH 

!  AYl+5      =  OOH 

t  AY 1+6       =  OOH 

JR  SC6J 

SZAYS      EQU  7  ;  LENGTH  OF  ARRAYS  IN  BYTES 

AYl! 

DB  034H 
DB  091 H 

DB  046H 
DB  002H 
DB  O 
DB  O 
DB  O 

AY2! 

DB  067H 
DB  045H 
DB  023H 
DB  001 H 

DB  O 
DB  O 
DB  O 


END 


Multiple-Preelslon  Dectmol  Multiplication 

(MPDMUL)  6K 


Multiplies  two  multi-byte  unsigned  decimal 
numbers.  Both  numbers  are  stored  with  their 
least  significant  digits  at  the  lowest  address.  The 
product  replaces  the  multiplicand.  The  length  of 
the  numbers  (in  bytes)  is  255  or  less.  Only  the 
least  significant  bytes  of  the  product  are  returned 
to  retain  compatibility  with  other  multiple- 
precision  decimal  operations. 

Procedure:  The  program  handles  each  digit  of 
the  mukiplicand  separately.  It  masks  the  digit 
off,  shifts  it  (if  it  is  the  upper  nibble  of  a  byte), 
and  then  uses  it  as  a  counter  to  determine  how 
many  times  to  add  the  muhiplier  to  the  partial 
product.  The  least  significant  digit  of  the  partial 
product  is  saved  as  the  next  digit  of  the  full 
product  and  the  partial  product  is  shifted  right 
four  bits.  The  program  uses  a  flag  to  determine 
whether  it  is  currently  working  with  the  upper  or 
lower  digit  of  a  byte.  A  length  of  00  causes  an 
exit  with  no  multiplication. 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  Depends  on  the  length  of  the 
operands  and  on  the  size  of  the  digits  in  the 
multiplicand  (since  those  digits  determine  how  many 
times  the  multiplier  must  be  added  to  the  partial 
product).  If  the  average  digit  in  the  multiplicand  has 
a  value  of  .5,  then  the  execution  time  is  approximately 
694  *  LENGTH2  +  1.555  *  LENGTH  +  272  cycles 
where  LENGTH  is  the  number  of  bytes  in  the 
operands. 

Program  Size:  167  bytes 

Data  Memory  Required:  520  bytes  anywhere  in 
RAM.  This  is  temporary  storage  for  the  high  bytes  of 
the  partial  product  (255  bytes  starting  at  address 
PROD),  the  multiplicand  (255  bytes  starting  at 
add  ress  MCAN  D),  the  length  of  the  arrays  ( 1  byte  at 
address  LEN),  a  digit  counter  indicating  upper  or 
lower  digit  (1  byte  at  address  DCNT),  a  loop  counter 
(1  byte  at  address  LPCNT),  an  overflow  byte  (1  byte 
at  address  OVRFLW),  pointers  to  the  multiplicand 
and  multiplier  (2  bytes  each  starting  at  addresses 
MCADR  and  MPADR,  respectively),  and  the  next 
byte  of  the  multiplicand  (1  byte  at  address  NBYTE). 
Special  Case:  A  length  of  0  causes  an  immediate 
exit  with  the  multiplicand  unchanged.  The  more 
significant  bytes  of  the  product  (starting  at  address 
PROD)  are  undefined. 


Entry  Conditions 


Exit  Conditions 


Base  address  of  multiplicand  in  HL 
Base  address  of  multiplier  in  DE 
Length  of  the  operands  in  bytes  in  B 


Mukiplicand  replaced  by  mukiplicand  times 
multiplier 


Example 

Note  that  MPDMUL  returns  only  the  less  sig- 
nificant bytes  of  the  product  (that  is,  the  number 
of  bytes  in  the  multiphcand  and  multiplier)  to 


1 .     Data:      Length  of  operands  (m  bytes)  =  04 
Multiplier  =  0000.3518,5 
Multiplicand  =  00006294|(, 

Result:      Multiplicand  =  22142292,^ 
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maintain  compatibility  with  other  multiple- 
precision  decimal  arithmetic  operations.  The 
more  significant  bytes  of  the  product  are  avail- 
able starting  with  their  least  significant  digits  at 


address  PROD.  The  user  may  need  to  check 
those  bytes  for  a  possible  overflow  or  extend  the 
operands  with  zeros. 


Title  Multiple-Precision  Decimal  Multiplication 

Name:  MPDMUL 


Purpose:  Multiply  2  arrays  of  BCD  bytes 

Multiplicand  =  multiplicand  »  multiplier 

Entry:  Register  pair  HL  =  Multiplicand  base  address 

Register  pair  DE  =  Multiplier  base  address 
Register  B  =  Length  of  arrays  in  bytes 

The  arrays  are  unsigned  BCD  numbers  with  a 
maximum  length  of  255  bytes,  ARRAYC03  is  the 
least  significant  byte,  and  ARRAY C LENGTH- 1 3 
the  most  significant  byte. 

Exit;  Multiplicand  :=  multiplicand  «  multiplier 

Registers  used:  AF,BC,DE,HL 

Time:  Assuming  the  average  digit  value  of  multiplicand 

is  5,  the  time  is  approximately 
t694  «  length'2)  +  (1555  «  length)  +  272  cycles 

Size:  Program  167  bytes 

Data        520  bytes 


MPDMUL: 


; INITIALIZE  COUNTERS  AND  POINTERS 


LD 

OR 

RET 

LD 

LD 

LD 

LD 


A,B 

A 

Z 

(LEN),A 
(LPCNT.l,A 
(MCADR),HL 
(MPADR),DE 


;TEST  LENGTH  OF  OPERANDS 


;EXIT  IF  LENGTH  IS  0 
SSAVE  LENGTH 
J  LOOP  COUNTER 
jSAVE  MULTIPLICAND  ADDRESS 
J  SAVE  MULTIPLIER  ADDRESS 


LENGTH  IN  BYTES 
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?SAVE  MULTIPLICAND  IN  TEMPORARY  BUFFER  tMCAND) 

LD  DE,MCAND  ?DE  POINTS  TO  TEMPORARY  MULTIPLICAND 

LD  (NBYTE),DE 

jHL  POINTS  TO  MULTIPLICAND 
LD  C,B  jBC  =  LENGTH 

LD  B,0 

LDIR  jMOVE  MULTIPLICAND  TO  BUFFER 

; CLEAR  PARTIAL  PRODUCT,   CONSISTING  OF  UPPER  BYTES 
!     STARTING  AT  PROD  AND  LOWER  BYTES  REPLACING 
!  MULTIPLICAND 
LD  HL, (MCADR) 

LD  A, (LEN) 

CALL        ZEROBUF  j ZERO  MULTIPLICAND 


J  ZERO  PRODUCT 
LD  HL,PROD 

CALL        ZEROBUF  ; ZERO  PRODUCT  ARRAY 


jLOOP  THROUGH  ALL  BYTES  OF  MULTIPLICAND 

LOOP: 

LD  A,  1 

LD  (DCNT),A  ? START  WITH  LOWER  DIGIT 


DLOOP: 


DLOOPl: 


sLOOP  THROUGH  2  DIGITS  PER  BYTE 
;   DURING  LOWER  DIGIT  DCNT  =  1 
J   DURING  UPPER  DIGIT  DCNT  =  0 


SUB 

A 

;A  =  0 

LD 

(OVRFLW) , A 

; CLEAR  OVERFLOW  BYTE 

LD 

A, (DCNT) 

OR 

A 

STEST  FOR  LOWER  DIGIT  (Z=0) 

LD 

HL,  (NBYTE) 

sGET  NEXT  BYTE 

LD 

A, tHL) 

JR 

NZ,  DLOOPl 

jJUMP  IF  LOWER  DIGIT 

RRCA 

5 SHIFT  UPPER  DIGIT  RIGHT  4  BITS 

RRCA 

RRCA 

RRCA 

AND 

OFH 

;KEEP  ONLY  CURRENT  DIGIT 

JR 

Z.SDIGIT 

;BRANCH  IF  DIGIT  IS  ZERO 

LD 

C,A 

;C  =  DIGIT 

ADDLPs 


J  ADD  MULTIPLIER  TO  PRODUCT  NDIGIT  TIMES 

LD  HL, <MPADR)  ;HL  =  MULTIPLIER  ADDRESS 

LD  DE,PROD  JDE  =  PRODUCT  ADDRESS 

LD  A, (LEN) 

LD  E,A  ;B  =  LENGTH 

OR  A  jCLEAR  CARRY  INITIALLY 


INNER: 

LD  A, (DE) 

ADC  A, (HL) 


;GET  NEXT  BYTE  OF  PRODUCT 
5ADD  NEXT  BYTE  OF  MULTIPLIER 
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DECND: 


SDIGIT: 


SDl: 


SHFTLP: 


DAA 

! DECIMAL  ADJUST 

LD 

CDE), A 

J  STORE  SUM  IN  PRODUCT 

Lit 

HI- 

INC 

DE 

DJNZ 

INNER 

; CONTINUE  UNTIL  ALL  BYTES  ADDED 

JR 

NC, DECND 

jJUMP  IF  NO  OVERFLOW  FROM  ADDITION 

LD 

HL,OVRFLW 

jELSE  INCREMENT  OVERFLOW  BYTE 

INC 

(HL) 

DEC 

C 

JR 

NZ , ADDLP 

J  CONTINUE  UNTIL  DIGIT  =  0 

; STORE 

LEAST  SIGNIFICANT  DIOIT  OF  PRODUCT 

J   AS  NEXT  DIGIT  OF 

MULTIPLICAND 

LD 

A, (PROD) 

sGET  LOW  BYTE  OF  PRODUCT 

AND 

OFH 

LD 

B,  A 

jSAVE  IN  B 

LD 

A, tDCNT) 

OR 

A 

;TEST  FOR  LOWER  DIGIT  (Z=0) 

1  n 

A,B 

;A  =  NEXT  DIGIT 

NZ,SD1 

jJUMP  IF  WORKING  ON  LOWER- DIGIT 

;ELSE  MOVE  DIGIT  TO  HIGH  BITS 

RRCA 

RRCA 

RRCA 

LD 

HL, (MCADR) 

; PLACE  NEXT  DIGIT  IN  MULTIPLICAND 

OR 

tHL) 

LD 

(HL), A 

! SHIFT 

PRODUCT  RIGHT  1  DIGIT  (4  BITS) 

LD 

A, (LEN) 

LD 

B,A 

;B  =  LENGTH 

LD 

E,  A 

LD 

D,  0 

LD 

HL, PROD 

ADD 

HL,DE 

;HL  POINTS  BEYOND  END  OF  PROD 

LD 

A, (OVRFLW) 

!A  =  OVERFLOW  BYTE 

DEC 

HL 

; DECREMENT,   POINT  TO  NEXT  BYTE 

RRD 

{ROTATE  BYTE  OF  PRODUCT  RIGHT  1  DIG I 

DJNZ 

SHFTLP 

! CONTINUE  UNTIL  DONE 

; CHECK 

IF  DONE  WITH 

1  BOTH  DIGITS  OF  THIS  BYTE 

LD 

HL,DCNT 

;ARE  WE  ON  LOWER  DIGIT? 

DEC 

tHL) 

JR 

Z , DLOOP 

J  YES,   DO  UPPER  DIGIT  OF  SAME  BYTE 

; INCREMENT  TO  NEXT 

BYTE  AND  SEE  IF  DONE 

LD 

HL, (NEYTE) 

; INCREMENT  TO  NEXT  MULTIPLICAND  BYTE 

INC 

HL 

LD 

(NBYTE),HL 
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LD 

HL, (MCADR) 

! INCREMENT 

TO  NEXT  RESULT 

INC 

HL 

LD 

( MCADR ),HL 

LD 

HL.LPCNT 

; DECREMENT 

LOOP  COUNTER 

DEC 

tHL> 

JR 

NZ , LOOP 

EXIT! 

RET 


ROUTINE:  ZEROBUF 
PURPOSE;   ZERO  A  BUFFER 

ENTRY:  HL  POINTS  TO  FIRST  BYTE  OF  BUFFER 

LEN  =  LENGTH  OF  BUFFER 
EXIT:     BUFFER  ZEROED 
REGISTERS  USED:  AF,BC,DE,HL 


ZEROBUF: 


LD 

CHL),0 

{ZERO  FIRST  BYTE 

LD 

A, (LEN) 

DEC 

A 

RET 

Z 

! RETURN  IF  ONLY  ONE  BYTE 

LD 

D,H 

LD 

E,L 

INC 

DE 

SDE  =  SECOND  BYTE 

LD 

C,A 

;BC  =  LENGTH  OF  ARRAY 

LD 

B,0 

LDIR 

{CLEAR  REST  OF  BUFFER  BY 

RET 

!  PROPAGATING  ZEROS  FROM  ONE 
;  BYTE  TO  THE  NEXT 

;DATA 

LEN: 

DS 

1 

! LENGTH  OF  ARRAYS 

DCNT: 

DS 

1 

; DIGIT  COUNTER  FOR  BYTES 

LPCNTs 

DS 

1 

J  LOOP  COUNTER 

OVRFLW: 

DS 

1 

; OVERFLOW  BYTE 

MCADR ! 

DS 

2 

SNEXT  BYTE  TO  STORE  INTO 

MPADR: 

DS 

2 

f ADDRESS  OF  MULTIPLIER 

NBYTE: 

DS 

2 

jNEXT  DIGIT  OF  MULTIPLICAND 

PROD: 

DS 

255 

f PRODUCT  BUFFER 

MCAND: 

DS 

255 

? MULTIPLICAND  BUFFER 

SAMPLE  EXECUTION: 


SC6K! 


LD 
LD 
LD 
CALL 


HL,AY1 
DE,AY2 
B.SZAYS 
MPDMUL 


;BASE  ADDRESS  OF  MULTIPLICAND 
jBASE  ADDRESS  OF  MULTIPLIER 
{LENGTH  OF  ARRAYS  IN  BYTES 
{MULTIPLE-PRECISION  BCD  MULTIPLICATION 
{RESULT  OF  1234  «  1234  =  1522756 
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f    IN  MEMORY  AYl  =  56H 

;  AYl+1  =  27H 

!  AYl+2  =  52H 

!  AYl+3  =  OIH 

;  AYl+4  =  OOH 

;  AY 1+5  =  OOH 

5  AY 1+6  =  OOH 

JR  SC6K 


S2AYS      EQU  7  ; LENGTH  OF  ARRAYS  IN  BYTES 

AYls 

DB  034H 

DB  012H 

DB  O 

DB  0 

DB  O 

DB  O 

DB  O 


AY2! 

DB  034H 

DB  01 2H 

DB  0 

DB  O 

DB  O 

DB  O 

DB  0 


END 


Multiple-Precision  Decimal  Division 

(MPDDIV)  6L 


Divides  two  multi-byte  unsigned  decimal 
numbers.  Both  numbers  are  stored  with  their 
least  significant  digits  at  the  lowest  address.  The 
quotient  replaces  the  dividend;  the  remainder  is 
not  returned,  but  its  base  address  is  in  memory 
locations  HDEPTR  and  HDEPTR+I.  The 
length  of  the  numbers  (in  bytes)  is  255  or  less. 
The  Carry  flag  is  cleared  if  no  errors  occur;  if  a 
divide  by  0  is  attempted,  the  Carry  flag  is  set  to 
1 ,  the  dividend  is  unchanged,  and  the  remainder 
is  set  to  0. 


Procedure:  The  program  divides  by  determin- 
ing how  many  times  the  divisor  can  be  subtracted 
from  the  dividend.  It  saves  that  number  in  the 
quotient,  makes  the  remainder  into  the  new 
dividend,  and  rotates  the  dividend  and  the 
quotient  left  one  digit.  The  program  exits 
immediately,  setting  the  Carry  flag,  if  it  finds 
the  divisor  to  be  0.  The  Carry  flag  is  cleared 
otherwise. 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  .Time:  Depends  on  the  lengtli  of  tlie 
operands  and  on  the  size  of  the  digits  in  the 
quotient  (determining  how  many  times  the  divisor 
must  be  subtracted  from  the  dividend).  If  the 
average  digit  in  the  quotient  has  a  value  of  5,  the 
execution  time  is  approximately  1054*  LENGTH^  + 
2297  *  LENGTH  +  390  cycles  where  LENGTH  is  the 
number  of  bytes  in  the  operands. 

Program  Size:  168  bytes 

Data  Memory  Required:  52.3  bytes  anywhere  in 
RAM.  This  is  storage  for  the  high  dividend  (255 
bytes  starting  at  address  HIDEl),  the  result  of  the 
subtraction  (255  bytes  starting  at  address  HIDE2), 
the  length  of  the  operands  (1  byte  at  address 


LENGTH),  the  next  digit  in  the  array  (1  byte  at 
address  NDIGIT),  the  counter  for  the  subtraction 
loop  (1  byte  at  address  CNT),  pointers  to  the 
dividend,  divisor,  current  high  dividend  and  remain- 
der, and  other  high  dividend  (2  bytes  each  starting  at 
addresses  DVADR,  DSADR,  HDEPTR,  and 
ODEPTR,  respectively),  and  the  divide  loop  counter 
(2  bytes  starting  at  address  COUNT). 
Special  Cases: 

1 .  A  length  of  0  causes  an  immediate  exit  with  the 
Carry  flag  cleared,  the  quotient  equal  to  the  original 
dividend,  and  the  remainder  undefined. 

2.  A  divisor  of  0  causes  an  exit  with  the  Carry  flag 
set  to  1 ,  the  quotient  equal  to  the  original  dividend, 
and  the  remainder  equal  to  0. 


Entry  Conditions 

Base  address  of  dividend  in  HL 
Base  address  of  divisor  in  DE 
Length  of  the  operands  in  bytes  in  B 


Exit  Conditions 

Dividend  replaced  by  dividend  divided  by  divisor 
If  the  divisor  is  non-zero,  Carry  =  0  and  the 

result  is  normal. 
If  the  divisor  is  0,  Carry  =  1 ,  the  dividend  is 

unchanged,  and  the  remainder  is  0. 
The  base  address  of  the  remainder  (i.e.,  the 

address  of  its  least  significant  digits)  is  in 

HDEPTR  and  HDEPTR-Hl. 


260 


6L  MULTIPLE -PRECISION  DECIMAL  DIVISION  (MPDDIV)  261 


Example 

1.     Data:     Length  of  operands  (in  bytes)  =  04 
Dividend  =  22142298, 
Divisor  =  00006294|j 

Result:      Dividend  =  00003518,j 

Remainder  (base  address  in  HDEPTR  and 

HDEPTR  +  1)  =  00000006|(, 

Carry  flag  is  0  to  indicate  no  divide-by-0  error. 


Title 
Name: 


Multiple-Precision  Decimal  Division 
MPDDIV 


Purpose; 
Entry: 


Exit! 


Divide  2  arrays  of  BCD  bytes 
Quotient   :=  dividend  /  divisor 

Register  pair  HL  =  Base  address  of  dividend 
Register  pair  DE  =  Base  address  of  divisor 
Register  B  =  Length  of  operands  in  bytes 

The  arrays  are  unsigned  BCD  numbers  with  a 
maximum  length  of  255  bytes,  ARRAYEOl  is  the 
least  significant  byte,   and  ARRAYCLENGTH-U 
the  most  significant  byte. 

Dividend  s=  dividend  /  divisor 
Remainder  :=  base  address  in  HDEPTR 
If  no  errors  then 

carry  :=  0 
ELSE 

divide-by-0  error 
carry  :=  1 
dividend  unchanged 
remainder  :=  0 


Registers  used;  AF,BC,DE,HL 


Time; 


Assuming  the  average  digit  value  in  the 
quotient  is  5  then  the  time  is  approximately 
(1054  K  length*2)  +  (2297  »  length)  +  390  cycles 


Size: 


Program  168  bytes 
Data        523  bytes 
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MPDDIV; 


INITLPs 


jSAVE  PARAMETERS  AND  CHECK  FOR  ZERO  LENGTH 

LD  (DVADR.1,HL  j  SAVE  DIVIDEND  ADDRESS 

LD  (DSADR),DE  ; SAVE  DIVISOR  ADDRESS 

LD  A,B 

LD  (LENGTH), A  ; SAVE  LENGTH 

Of'  JTEST  LENGTH 

JP  Z,OKEXIT  sEXIT  IF  LENGTH  =  0 

?ZERO  BOTH  DIVIDEND  BUFFERS 

}   AND  SET  UP  THE  DIVIDEND  POINTERS 

!"n  fbA^JiS^f  '^^  =  ADDRESS  OF  HIGH  DIVIDEND  1 

LD  (HDEPTR),HL  5HIGH  DIVIDEND  PTR  =  HI DEI 

fn  ?n;ci?o?  =  ADDRESS  OF  HIGH  DIVIDEND  2 

LD  (ODEPTR.),DE  ; OTHER  DIVIDEND  PTR  =  HIDE2 

^•-'^  ^  ;GET  0  TO  USE  IN  FILLING  BUFFERS 

?B  =  LENGTH  IN  BYTES 
JFILL  BOTH  DIVIDEND  BUFFERS  WITH  ZEROS 

}-£  (HL),A  jZERO  BYTE  OF  HIDEl 

LD  (DE),A  jZERO  BYTE  OF  HIDE2 

INC  HL 

INC  DE 

DJNZ  INITLP 

J  SET  COUNT  TO  NUMBER  OF  DIGITS  PLUS  1 
!   COUNT  5=  (LENGTH  k  2)  +  1? 

LD  A, (LENGTH)  jEXTEND  LENGTH  TO  16  BITS 

LD  L,  A 

LD  H,0 

ADD  HL,HL  ; LENGTH  »  2 

INC  HL  ; LENGTH  »  2  +  1 

LD  (COUNT), HL  f COUNT  =  LENGTH  »  2  +  1 

I  CHECK  FOR  DIVIDE  BY  ZERO 

J    LOGICALLY  OR  ENTIRE  DIVISOR  TO  SEE  IF  ALL  BYTES  ARE  0 
LD  HL,(DSADR)  -HL  =  ADDRESS  OF  DIVISOR 

LD  A, (LENGTH) 

B.A  fB  =  LENGTH  IN  BYTES 


SUB  A 


DVOl: 


! START  LOGICAL  OR  WITH  O 


°^  <HL)  -OR  NEXT  BYTE  OF  DIVISOR 

INC  HL 

DJNZ  DVOl 

°S  t  ?TEST  FOR  ZERO  DIVISOR 

■-'R  Z.EREXIT  ?ERROR  EXIT  IF  DIVISOR  IS  0 

SUB  A 

LD  (NDIGIT),A  ; START  NEXT  DIGIT  AT  O 

J  DIVIDE  BY  DETERMINING  HOW  MANY  TIMES  DIVISOR  CAN 
;     BE  SUBTRACTED  FROM  DIVIDEND  FOR  EACH  DIGIT 
;  POSITION 
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DVLOOPs 

; ROTATE  LEFT  LOWER  DIVIDEND  AND  QUOTIENT: 
;   HIGH  DIGIT  OF  NDIGIT  BECOMES  LEAST  SIGNIFICANT  DIGIT 
J  OF  QUOTIENT  (DIVIDEND  ARRAY)  AND  MOST  SIGNIFICANT  DIGIT 
5   OF  DIVIDEND  ARRAY  GOES  TO  HIGH  DIGIT  OF  NDIGIT 


LD 

HL, (DVADR) 

CALL 

RLARY 

; ROTATE  LOW  DIVIDEND 

:IF  DIGIT  COUNT  =  0 

THEN  WE  ARE  DONE 

LD 

HL,  (COUNT.) 

J  DECREMENT  COUNT  BY  1 

DEC 

HL 

LD 

( COUNT ).HL 

LD 

A,H 

jTEST  16-BIT  COUNT  FOR 

OR 

L 

JR 

Z.OKEXIT 

J  EX  IT  WHEN  COUNT  =  0 

jROTATE  LEFT  HIGH  DIVIDEND,   LEAST  SIGNIFICANT  DIGIT 
f  OF  HIGH  DIVIDEND  BECOMES  HIGH  DIGIT  OF  NDIGIT 
LD  HL, (HDEPTR) 


CALL        RLARY  ; ROTATE  HIGH  DIVIDEND 

I  SEE  HOW  MANY  TIMES  DIVISOR  GOES  INTO  HIGH  DIVIDEND 

;  ON  EXIT  FROM  THIS  LOOP,   HIGH  DIGIT  OF  NDIGIT  IS  NEXT 

J   QUOTIENT  DIGIT  AND  HIGH  DIVIDEND  IS  REMAINDER 

SUB  A  5 CLEAR  NUMBER  OF  TIMES  INITIALLY 

LD  (NDIGIT), A 


SUBLP! 


LD 

HL, (DSADR) 

;HL  POINTS  TO 

DIVISOR 

LD 

DE, (HDEPTR) 

SDE  POINTS  TO 

CURRENT  HIGH  DIVIDEND 

LD 

BC, (ODEPTR) 

;BC  POINTS  TO 

OTHER  HIGH  DIVIDEND 

LD 

A, (LENGTH) 

LD 

(CNT),A 

SLOOP  COUNTER 

=  LENGTH 

OR 

A 

S CLEAR  CARRY 

INITIALLY 

INNER: 


LD 

SBC 

DAA 

LD 

INC 

INC 

INC 

LD 

DEC 

LD 

JR 

JR 


A, (DE) 
A, (HL) 

(BC),A 
HL 
DE 
BC 

A, (CNT) 
A 

(CNT) , A 
NZ, INNER 
CDVLOOP 


!GET  NEXT  BYTE  OF  DIVIDEND 
f SUBTRACT  DIVISOR 
; CHANGE  TO  DECIMAL 

! STORE  DIFFERENCE  IN  OTHER  DIVIDEND 
INCREMENT  TO  NEXT  BYTE 


{DECREMENT  COUNTER 


; CONTINUE  THROUGH  ALL  BYTES 
jJUMP  WHEN  BORROW  OCCURS 
J NDIGIT  IS  NUMBER  OF  TIMES  DIVISOR 
;   GOES  INTO  ORIGINAL  HIGH  DIVIDEND 
5  HIGH  DIVIDEND  CONTAINS  REMAINDER 
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! DIFFERENCE  IS  NOT  NEGATIVE,  SO  ADD  1  TO 
J     NUMBER  OF  SUCCESSFUL  SUBTRACTIONS 
t      (LOW  DIGIT  OF  NDIGIT) 

LD  HL, NDIGIT  sNDIGIT  =  NDIGIT  +  1 

INC  (HL) 


f EXCHANGE  POINTERS,   THUS  MAKING  DIFFERENCE  NEW  DIVIDEND 
LD  HL, (HDEPTR) 

LD  DE, (ODEPTR) 

LD  ( HDEPTR ),DE 

LD  ( ODEPTR ),HL 

JR  SUBLP  ; CONTINUE  UNTIL  DIFFERENCE  NEGATIVE 

fNO  ERRORS,  CLEAR  CARRY 

OKEXIT: 

OR  A  J  CLEAR  CARRY,   VALID  RESULT 

RET 

; DIVIDE-BY-ZERO  ERROR,   SET  CARRY 

EREXIT: 

SCF  fSET  CARRY,    INVALID  RESULT 

RET 


; SUBROUTINE!  RLARY 

; PURPOSE:         ROTATE  LEFT  AN  ARRAY  ONE  DIGIT  (4  BITS) 
f ENTRY:  HL  =  BASE  ADDRESS  OF  ARRAY 

!  LOW  DIGIT  OF  NDIGIT  IS  DIGIT  TO  ROTATE  THROUGH 

jEXIT:  ARRAY  ROTATED  LEFT  THROUGH  LOW  DIGIT  OF  NDIGIT 
; REGISTERS  USED:   AF,   BC,   DE,  HL 

RLARY: 

J  SHIFT  NDIGIT  INTO  LOW  DIGIT  OF  ARRAY  AND 
J   SHIFT  ARRAY  LEFT 
LD  A, (LENGTH) 

LD  B,  A 

LD  A, (NDIGIT) 


;E  =  LENGTH  OF  ARRAY  IN  BYTES 
!A  =  NDIGIT 


SHIFT: 


RLD 

INC 

DJNZ 

LD 

RET 


HL 

SHIFT 
(NDIGIT), A 


! SHIFT  BYTE  LEFT  1  DIGIT  (4  BITS) 

; CONTINUE  UNTIL  ALL  BYTES  SHIFTED 
;SAVE  NEW  NEXT  DIGIT 


jDATA 

LENGTH: 

DS 

1 

NDIGIT: 

DS 

1 

CNT: 

DS 

1 

DVADR: 

DS 

2 

DSADR: 

DS 

2 

HDEPTR: 

DS 

2 

ODEPTR; 

DS 

2 

J  LENGTH  OF  ARRAYS  IN  BYTES 

SNEXT  DIGIT  IN  ARRAY 

! COUNTER  FOR  SUBTRACT  LOOP 

! DIVIDEND  ADDRESS 

J  DIVISOR  ADDRESS 

SHIGH  DIVIDEND  POINTER 

f OTHER  DIVIDEND  POINTER 
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COUNT: 
HIDEl: 
HIDE2! 


DS 
DS 
DS 


2 

255 
255 


; DIVIDE  LOOP  COUNTER 
fHIGH  DIVIDEND  BUFFER  1 
jHIGH  DIVIDEND  BUFFER  2 


SAMPLE  EXECUTION: 


SC6L! 


LD 
LD 
LD 

CALL 


HL, AYl 
DE,AY2 
B.SZAYS 
MPDDIV 


BASE  ADDRESS  OF  DIVIDEND 
BASE  ADDRESS  OF  DIVISOR 
LENGTH  OF  ARRAYS  IN  BYTES 
MULTIPLE-PRECISION  BCD  DIVISION 
RESULT  OF  1522756  /  1234  =  1234 
IN  MEMORY  AYl  =  34H 

AYl+1  =  12H 
AY 1+2  =  OOH 
AY 1+3  =  OOH 
AY 1+4  =  OOH 
AY 1+5  =  OOH 
AY 1+6       =  OOH 


SZAYS 


JR 

EQU 

AYl: 


SC6L 


DB 
DB 
DB 
DB 
DB 
DB 
DB 


; LENGTH  OF  ARRAYS  IN  BYTES 


056H 

027H 

052H 

OIH 

0 

0 

0 


ay; 


DB 
DB 
DB 
DB 
DB 
DB 
DB 


034H 

012H 

0 

0 

0 

0 

0 


END 


Multiple-Precision  Decimal  Comparison  6M 


Compares  two  multi-byte  unsigned  decimal 
(BCD)  numbers  and  sets  the  Carry  and  Zero 
flags  appropriately.  The  Zero  flag  is  set  to  I  if  the 
operands  are  equal  and  to  0  if  they  are  not  equal. 
The  Carry  flag  is  set  to  1  if  the  subtrahend  is 
larger  than  the  minuend;  the  Carry  flag  is 
cleared  otherwise.  Thus  the  flags  are  set  as  if  the 


subtrahend  had  been  subtracted  from  the 
minuend. 

Note:  This  program  is  exactly  the  same  as 
Subroutine  6H,  the  multiple-precision  binary 
comparison,  since  the  form  of  the  operands  does 
not  matter  if  they  are  only  being  compared.  See 
Subroutine  6H  for  a  listing  and  other  details. 


Examples 


!.     Data:      Length  of  operands  (in  bytes)  =  6 
Subtrahend  =  I96528719.340|5 
Minuend  =  456780153266|(, 

Result:     Zero  flag  =  0  (operands  are  not  equal) 

Carry  flag=  0  (subtrahend  is  not  larger  than 
minuend) 

2.     Data;      Length  of  operands  (in  bytes)  =  6 
Subtrahend  =  196528719340,6 
Minuend  =  196.'528719340,(, 

Result:     Zero  flag  =  1  (operands  are  equal) 

Carry  flag  =  0  (subtrahend  is  not  larger  than 
minuend) 


3.     Data:         Length  of  operands  (in  bytes)  =  6 
Subtrahend  =  196528719340,5 
Minuend  =  073785991074,5 

Result:        Zero  flag  =  0  (operands  are  not  equal) 
Carry  flag=  1  (subtrahend  is  larger  than 
minuend) 
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7A 


Extracts  a  field  of  bits  from  a  byte  and 
returns  the  field  in  the  least  significant  bit  posi- 
tions. The  width  of  the  field  and  its  lowest  bit 
position  are  parameters. 

Procedure:  The  program  obtains  a  mask  with 
the  specified  number  of  I  bits  from  a  table,  shifts 


the  mask  left  to  align  it  with  the  specified  lowest 
bit  position,  and  obtains  the  field  by  logically 
ANDing  the  mask  with  the  data.  It  then  normal- 
izes the  bit  field  by  shifting  it  right  so  that  it 
starts  in  bit  0. 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  21  *  LOWEST  BIT  POSITION 
plus  86  cycles  overhead.  (The  lowest  bit  position 
determines  the  number  of  times  the  mask  must  be 
shifted  left  and  the  bit  field  right.) 

Program  Size:  32  bytes 

Data  Memory  Required:  None 

Special  Cases: 

1.  Requesting  a  field  that  would  extend  beyond 
the  end  of  the  byte  causes  the  program  to  return  with 
only  the  bits  through  bit  7.  That  is,  no  wraparound  is 
provided.  If;  for  example,  the  user  asks  for  a  6-bit 


field  starting  at  bit  5,  the  program  will  return  only  3 
bits  (bits  5  through  7). 

2.  Both  the  lowest  bit  position  and  the  number  of 
bits  in  the  field  are  interpreted  mod  8.  That  is,  for 
example,  bit  position  11  is  equivalent  to  bit  position  3 
and  a  field  of  10  bits  is  equivalent  to  a  field  of  2  bits. 
Note,  however,  that  the  number  of  bits  in  the  field  is 
interpreted  in  the  range  I  to  8.  That  is,  a  field  of  16 
bits  is  equivalent  to  a  field  of  8  bits,  not  to  a  field  of  0 
bits. 

3.  Requesting  a  field  of  width  0  causes  a  return 
with  a  result  of  0. 


Entry  Conditions  Exit  Conditions 

Starting  (lowest)  bit  position  in  the  field  Bit  field  in  A  (normalized  to  bit  0) 

(0  to  7)  in  A 
Number  of  bits  in  the  field  (1  to  8)  in  D 
Data  byte  in  E 


Exampies 


I.     Data:      Data  value  =  F6|,,  =  lllIOllOj 
Lowest  bit  position  =  4 
Number  of  bits  in  the  field  =  3 

Result:      Bit  field  =  07|e,=  00000111, 

Three  bits,  starting  at  bit  4,  have  been  ex- 
tracted (that  is,  bits  4  through  6). 


Data:      Data  value  =  hi,, 


10100010, 


Lowest  bit  position  —  6 
Number  of  bits  in  tire  field  =  5 

ResuU:      Bit  field  =  02|(,  =  OOOOOOlOj 

Two  bits,  starting  at  bit  6,  have  been  ex- 
tracted (that  is,  bits  6  and  7);  that  was  all 
that  was  available,  although  five  bits  were 
requested. 
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Title  Bit  Field  Extraction 

Name :  EFE 


BFEs 


SHFT: 


EXTR: 


Purpose!  Extract  a  field  of  bits  from  a  byte  and 

return  the  field  normalized  to  bit  0 
NOTE:    IF  THE  REQUESTED  FIELD  IS  TOO  LONG,  THEN 
ONLY  THE  BITS  THROUGH  BIT  7  WILL  BE 
RETURNED.   FOR  EXAMPLE,    IF  A  4-BIT  FIELD  IS 
REQUESTED  STARTING  AT  BIT  7,   ONLY  1 
BIT  (BIT  7.)  WILL  BE  RETURNED. 

Entry!  Register  D  =  Number  of  bits  in  field  (1  to  8.1 

Register  E  =  Data  byte 

Register  A  =  Starting  (lowest)  bit  position  in 
the  field  (0  to  7.1 

Exit!  Register  A  =  Field 

Registers  used!  AF,BC,DE,HL 

Time!  86  cycles  overhead  plus 

(21  «  lowest  bit  position)  cycles 

Size:  Program  32  bytes 


5  SHIFT 

DATA  TO  NORMALIZE  TO  BIT  0 

;  NO 

SHIFTING  NEEDED 

IF  LOWEST  POSITION  IS  0 

AND 

OOOOOUIB 

;ONLY  ALLOW  POSITIONS  0  TO  7 

JR 

Z.EXTR 

J  JUMP  IF  NO  SHIFTING  NEEDED 

LD 

B,A 

fMOVE  SHIFT  COUNT  TO  B 

SRL 

E 

; SHIFT  DATA  RIGHT 

DJNZ 

SHFT 

; CONTINUE  UNTIL  NORMALIZED 

jEXTRACT  FIELD  BY  MASKING  WITH  I'S 

LD 

A,D 

;TEST  NUMBER  OF  BITS  FOR  ZERO 

OR 

A 

RET 

Z 

jEXIT  IF  NUMBER  OF  BITS  =  0 

J     FIELD  IS  0  ON  EXIT 

DEC 

A 

; DECREMENT  A  TO  NORMALIZE  TO  0 

AND 

0000011  IB 

sONLY  ALLOW  0  THROUGH  7 

LD 

C,A 

;BC  =  INDEX  INTO  MASK  ARRAY 

LD 

B,0 

LD 

HL,MSKARY 

;HL  =  BASE  OF  MASK  ARRAY 

ADD 

HL,BC 
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MSKARY: 


LD  A,E  ;GET  DATA 

AND  (HL)  jMASK  OFF  UNWANTED  BITS 

RET 

SMASK  ARRAY  WITH  1  TO  8  ONE  BITS 

DB  0000000 IB 

DB  OOOOOOllB 

DB  0000011  IB 

DB  00001 11  IB 

DB  0001 11  HE 

DB  00111 illB 

DB  OlllllUB 

DB  UllllllB 


!  SAMPLE  EXECUTION: 

SC7A5 


LD 

E,00011000B 

; REGISTER  E  =  DATA 

LD 

D,3 

; REGISTER  D  =  NUMBER  OF  BITS 

LD 

A, 2 

f ACCUMULATOR  =  LOWEST  BIT  POSITION 

CALL 

BFE 

{EXTRACT  3  BITS  STARTING  WITH  »2 

JR 

SC7A 

;     RESULT  =  00000 11 OB 

END 

Bit  Field  insertiori  (BFI) 


7B 


Inserts  a  field  of  bits  into  a  byte.  The  width  of 
the  field  and  its  starting  (lowest)  bit  position  are 
parameters. 

Procedure:  The  program  obtains  a  mask  with 
the  specified  number  of  0  bits  from  a  table.  It 
then  shifts  the  mask  and  the  bit  field  left  to  align 


them  with  the  specified  lowest  bit  position.  It 
logically  ANDs  the  mask  with  the  original  data 
byte,  thus  clearing  the  required  bit  positions, 
and  then  logically  ORs  the  result  with  the  shifted 
bit  field. 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  25  *  LOWEST  BIT  POSITION 
plus  13.3  cycles  overhead.  (The  lowest  bit  position  of 
the  field  determines  how  many  times  the  mask  and 
the  field  must  be  shifted  left.) 

Program  Size:  40  bytes 

Data  Memory  Required:  None 

Special  Cases: 

1.  Attempting  to  insert  a  field  that  would  extend 
beyond  the  end  of  the  byte  causes  the  program  to 
insert  only  the  bits  through  bit  7,  That  is,  no  wrap- 


around is  provided.  If,  for  example,  the  user  attempts 
to  insert  a  6-bit  field  starting  at  bit  4,  only  4  bits  (bits  4 
through  7)  are  actually  replaced. 

2.  Both  the  starting  bit  position  and  the  width  of 
the  bit  field  (number  of  bits)  are  interpreted  mod  8. 
That  is,  for  example,  bit  position  1 1  is  the  same  as  bit 
position  3  and  a  12-bit  field  is  the  same  as  a  4-bit  field. 
Note,  however,  that  the  width  of  the  field  is  mapped 
into  the  range  1  to  8.  That  is,  for  example,  a  16-bit 
field  is  the  same  as  an  8-bit  field. 

3.  Attempting  to  insert  a  field  of  width  0  causes  a 
return  with  a  result  of  0. 


Entry  Conditions 

Data  in  A 

Number  of  bits  in  the  field  (1  to  8)  in  B 
Starting  (lowest)  bit  position  of  field  in  C 
Field  to  insert  in  E 


Exit  Conditions 

Result  in  A 

The  result  is  the  original  data  with  the  bit  field 
inserted,  starting  at  the  specified  bit  position. 


Examples 

1.     Data:     Value  =  F6|6  =  llllOllOj 
Lowest  bit  position  =  4 
Number  of  bits  in  the  field  =  2 
Bit  field  =  01 ,5  =  OOOOOOOlj 

Result:     Value  with  bit  field  inserted  = 
D6|6=  IIOIOIIO2 
The  2-bit  field  has  been  inserted  into  the  orij 
nal  value  starting  at  bit  4  (into  bits  4  and  i 


2.     Data:      Value  =  BS.f,  =  IOIIIOOO2 
Lowest  bit  position  =  1 
Number  of  bits  in  the  field  =  5 
Bit  field  =  15,6  =  OOOIOIOI2 

Result:      Value  with  bit  field  inserted  =  A  A|(,  =  lOlOIOlOj 
The  5-bit  field  has  been  inserted  into  the  origi- 
nal value  starting  at  bit  1  (into  bits  I  through 
5),  changing  IllOOj  (IC^)  to  lOlOlj  (15,f,). 
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Title 
Name: 


Bit  Field  Insertion 
BFI 


Purpose: 


BFI: 


Entry: 


Insert  a  field  of  bits  into  a  byte  and  return 
the  byte 

NOTE:    IF  THE  REQUESTED  FIELD  IS  TOO  LONG, 
ONLY  THE  BITS  THROUGH  BIT  7  WILL  BE 
INSERTED.   FOR  EXAHPLE,    IF  A  4-BIT  FIELD  IS 
TO  BE  INSERTED  STARTING  AT  BIT  7  THEN 
ONLY  1  BIT  (BIT  7)  WILL  BE  INSERTED. 

Register  A  =  Byte  of  data 

Register  E  =  Number  of  bits  in  the  field  (1 

to  8.) 

Register  C  =  Starting  (lowest)  bit  position  in 
which  the  data  will  be  inserted 
(0  to  7) 

Register  E  =  Field  to  insert 


Exit : 

Register 

A  =  Data 

Registers  used:  AF,BC,DE,HL 

Time: 

133  cycles  overhead  plus 

(25  K 

starting  bit  position)  cycles 

Size: 

Program 

40  bytes 

PUSH 

AF 

jSAVE  DATA  BYTE 

;GET 

MASK  WITH  REQUIRED 

NUMBER  OF  0  BITS 

PUSH 

BC 

fSAVE  STARTING  BIT  POSITION 

LD 

HL,MSKARY 

LD 

A,B 

;GET  NUMBER  OF  BITS 

AND 

A 

jTEST  NUMBER  OF  BITS  FOR  0 

RET 

2 

; RETURN  WITH  0  RESULT  IF  NUMBER 

J    OF  BITS  IS  0 

DEC 

A 

{NORMALIZE  TO  0...7 

AND 

0000011 IB 

;ONLY  ALLOW  0. . .7 

LD 

C,  A 

LD 

B,0 

ADD 

HL,BC 

; INDEX  INTO  MASK  ARRAY 

LD 

D, (HL) 

;D  =  MASK  WITH  ZEROS  FOR  CLEARING 

POP 

BC 

{RESTORE  STARTING  BIT 

STEST  IF  STARTING  BIT  IS  0 
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SFIELDs 


INSRTs 


HSKARYi 


1  n 
uu 

mNU 

00000 1 1 1 D 

J  RESTRICT  STARTING  BIT  TO  0. 

JR 

Ir INSRT 

;JUMP  IF  STARTING  BIT  IS  0 

;   NO  ALIGNMENT  IS  NECESSARY 

? ALIGN 

FIELD  TO  IN 

SERT  AND  MASK  IF  STARTING  BIT  NON- 

1  n 

;B  =  STARTING  BIT  NUMBER 

1  rt 
LU 

Ar  U 

f  A  =  MASK 

SLA 

E 

; SHIFT  FIELD  LEFT  TO  INSERT 

RLCA 

; ROTATE  MASK 

DJNZ 

SFIELD 

; CONTINUE  UNTIL  ALIGNED 

LD 

D,  A 

;  INSERT 

FIELD 

POP 

AF 

?  Ut 1    DAT  A  BACK 

AND 

D 

J  AND  OFF  MASK  AREA 

DR 

E 

_               T  hi     C  TCI  n 

•OR  IN  FIELD 

RET 

jMASK  ARRAY  -  1  TO 

8  ZERO  BITS 

DB 

UlllllOB 

DB 

iinuooE 

DB 

lllllOOOB 

DB 

IIUOOOOB 

DB 

UIOOOOOB 

DB 

llOOOOOOB 

DB 

lOOOOOOOE 

DB 

OOOOOOOOB 

SAMPLE  EXECUTION; 


SC7BS 


LD  A,  UllUllB  J  REGISTER  A  =  DATA 

LD  B,3  5 REGISTER  B  =  NUMBER  OF  BITS 

LD  C,2  ^REGISTER  C  =  LOWEST  BIT  POSITION 

LD  E,0000010iB  5  REGISTER  E  =  FIELD  TO  INSERT 

CALL  BFI  5  INSERT  3-BIT  FIELD  STARTING  AT 


JR 


SC7B 


BIT  2,  RESULT  =  llllOlUE 


END 


Multiple-Precision  Arithmetic  Shift  Right 

(MPASR)  7C 


Shifts  a  multi-byte  operand  right  arithmeti- 
cally by  a  specified  number  of  bit  positions.  The 
length  of  the  operand  (in  bytes)  is  255  or  less. 
The  Carry  flag  is  set  from  the  last  bit  shifted  out 
of  the  rightmost  bit  position.  The  operand  is 
stored  with  its  least  significant  byte  at  the  lowest 
address. 

Procedure:  The  program  obtains  the  sign  bit 
from  the  most  significant  byte,  saves  that  bit  in 
the  Carry,  and  then  rotates  the  entire  operand 
right  one  bit,  starting  with  the  most  significant 
byte.  It  repeats  the  operation  for  the  specified 
number  of  shifts. 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  NUMBER  OF  SHIFTS  *  (46  + 
34  *  LENGTH  OF  OPERANDS  IN  BYTES)  + 
59  cycles 

Program  Size:  28  bytes 

Data  Memory  Required:  None 

Special  Cases: 

1 .  If  the  length  of  the  operand  is  0,  the  program 
exits  immediately  with  the  operand  unchanged  and 
the  Carry  flag  cleared. 

2.  If  the  number  of  shifts  is  0,  the  program  exits 
immediately  with  the  operand  unchanged  and  the 
Carry  flag  cleared. 


Entry  Conditions 

Base  address  of  operand  in  HL 
Length  of  the  operand  in  bytes  in  B 
Number  of  shifts  (bit  positions)  in  C 


Exit  Conditions 

Operand  shifted  right  arithmetically  by  the  spec- 
ified number  of  bit  positions.  The  original  sign 
bit  is  extended  to  the  right.  The  Carry  flag  is  set 
from  the  last  bit  shifted  out  of  the  rightmost  bit 
position.  Carry  is  cleared  if  either  the  number 
of  shifts  or  the  length  of  the  operand  is  0. 


Examples 

1.  Data;  Length  of  operand  (in  bytes)  =  08 
Operand  =  85  A4C719FE06741E|6 
Number  of  shifts  =  04 

Result:     Shifted  operand  =  F85A4C7I9FE06741 

This  is  the  original  operand  shifted  right  four 
bits  arithmetically;  the  four  most  signifi- 
cant bits  all  take  the  value  of  the  original 
sign  bit  (1). 
Cany  =  1,  since  the  last  bit  shifted  from  the 
rightmost  bit  position  was  1. 


2.     Data:      Length  of  operand  (in  bytes)  =  04 
Operand  =  3F6A42D3|6 
Number  of  shifts  =  03 

Result:     Shifted  operand  =  07ED485A|6 

This  is  the  original  operand  shifted  right  three 
bits  arithmetically;  the  three  most  signifi- 
cant bits  all  take  the  value  of  the  original 
sign  bit  (0). 
Carry  =  0,  since  the  last  bit  shifted  from  the 
rightmost  bit  position  was  0. 
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MPASRs 


Title  Multiple-Precision  Arithmetic  Shift  Right 

Names  MPASR 


Purposes  Arithmetic  shift  right  a  multi-byte  operand 

N  bits 

Entry:  Register  pair  HL  =  Base  address  of  operand 

Register  B  =  Length  of  operand  in  bytes 
Register  C  =  Number  of  bits  to  shift 

The  operand  is  stored  with  ARRAYC03  as  its 

least  significant  byte  and  ARRAY C LENGTH- 1 ] 

its  most  significant  byte,  where  ARRAY 
is  its  base  address. 

Exit!  Operand  shifted  right  with  the  most  significant 

bit  propagated. 

CARRY  s=  Last  bit  shifted  from  least 
significant  position. 

Registers  used:  AF,BC,DE,HL 

Times  59  cycles  overhead  plus 

((34  «  length)  +  46.)  cycles  per  shift 

Sizes  Program  28  bytes 


J  EXIT  IF  NUMBER  OF  SHIFTS  OR  LENGTH  OF  OPERAND  IS  0 
J  OR  CLEARS  CARRY  IN  EITHER  CASE 
LD  A,C 
OR  A 

RET  Z  r RETURN  IF  NUMBER  OF  SHIFTS  IS  0 

LO  A,B 
OR  A 

RET  Z  J  RETURN  IF  LENGTH  OF  OPERAND  IS  0 

! CALCULATE  ADDRESS  OF  MOST  SIGNIFICANT  (LAST)  BYTE 

LD  E,B  ;  ADDRESS  OF  MSB  =  BASE  +  LENGTH- 1 

LD  D,0 

ADD  HL, DE 

DEC  HL  jHL  =  ADDRESS  OF  MSB 

;C  =  NUMBER  OF  SHIFTS 
;A  =  LENGTH  OF  OPERAND 

jLOOP  on  NUMBER  OF  SHIFTS  TO  PERFORM 

J  INITIAL  CARRY  =  MOST  SIGNIFICANT  BIT  OF  ENTIRE  OPERAND 
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LD 

B, (HL) 

;GET  MOST  SIGNIFICANT  BYTE 

RL 

B 

SCARRY  =  MOST  SIGNIFICANT  BIT 

LD 

B,  A 

LD 

E,  L 

jSAVE  ADDRESS  OF  MSB 

LD 

D,H 

J  ROTATE 

BYTES  RIGHT 

STARTING  WITH  MOST  SIGNIFICANT 

RR 

(HL) 

; ROTATE  A  BYTE  RIGHT 

DEC 

HL 

; DECREMENT  TO  LESS  SIGNIFICANT 

DJNZ 

ASRLP 

LD 

L,E 

J  RESTORE  ADDRESS  OF  MSB 

LD 

H,D 

DEC 

C 

J  DECREMENT  NUMBER  OF  SHIFTS 

JR 

NZ , LOOP 

RET 

SAMPLE  EXECUTION! 


SBASE  ADDRESS  OF  OPERAND 
J  LENGTH  OF  OPERAND  IN  BYTES 
; NUMBER  OF  SHIFTS 
; SHIFT 

RESULT  OF  SHIFTING    EDCBA987654321H,   4  BITS  I 

FEDCBA98765432H,  C=0 


AY 

032H 

AY+1 

054H 

AY+2 

076H 

AY+3 

098H 

AY+4 

OBAH 

AY+5 

ODCH 

AY+6 

OFEH 

UR  SC7C 


5  DATA  SECTION 

EQU  7  J  LENGTH  OF  OPERAND  IN  BYTES 

EQU  4  ; NUMBER  OF  SHIFTS 

DE  2 1 H , 43H , 65H , 87H , 0A9H , OCBH , OEDH 


LD  HL,AY 

LD  B,SZAY 

LD  C, SHIFTS 

CALL  MPASR 


END 


l^uStiple-Precision  Logloal  Shift  Left 

(MPLSL) 


7D 


Shifts  a  multi-byte  operand  left  logically  by  a 
specified  number  of  bit  positions.  The  length  of 
the  operand  (in  bytes)  is  255  or  less.  The  Carry 
flag  is  set  from  the  last  bit  shifted  out  of  the 
leftmost  bit  position.  The  operand  is  stored  with 
its  least  significant  byte  at  the  lowest  address. 

Procedure:  The  program  clears  the  Carry 
initially  (to  fill  with  a  0  bit)  and  then  shifts  the 
entire  operand  left  one  bit,  starting  with  the  least 
significant  byte.  It  repeats  the  operation  for  the 
specified  number  of  shifts. 


Registers  Used:  AF,  BC,  DE 

Execution  Time:  NUMBER  OF  SHIFTS  *  (27+.34* 
LENGTH  OFOPERANDlNBYTES)+31  cycles 

Program  Size:  21  bytes 

Data  l\4emory  Required:  None 

Special  Cases: 

1.  !f  the  length  of  the  operand  is  0,  the  program 
exits  immediately  with  the  operand  unchanged  and 
the  Carry  flag  cleared. 

2.  If  the  number  of  shifts  is  0,  the  program  exits 
immediately  with  the  operand  unchanged  and  the 
Carry  flag  cleared. 


Entry  Conditions 

Base  address  of  operand  in  HL 
Length  of  operand  in  bytes  in  B 
Number  of  shifts  (bit  positions)  in  C 


Exit  Conditions 

Operand  shifted  left  logically  by  the  specified 
number  of  bit  positions  (the  least  significant  bit 
positions  are  filled  with  O's).  The  Carry  flag  is  set 
from  the  last  bit  shifted  out  of  the  leftmost  bit 
position.  Carry  is  cleared  if  either  the  number  of 
shifts  or  the  length  of  the  operand  is  0. 


ixompies 

1 .  Data:  Length  of  operand  (in  bytes)  =  08 
Operand  =  8.5A4C7!9FE06741E|(, 
Number  of  shifts  =  04 

Result:     Shifted  operand  =  ,5A4C719FE06741E0|(, 

This  is  the  original  operand  shifted  left  four 

bits  logically;  the  four  least  significant  bits 

are  all  cleared. 
Carry  =  0,  since  the  last  bit  shifted  from  the 

leftmost  bit  position  was  0. 


2.     Data:      Length  of  operand  (in  bytes)  =  04 
Operand  =  3F6A42D.3|5 
Number  of  shifts  =  0.3 

Result:     Shifted  operand  =  FB521698|6 

This  is  the  original  operand  shifted  left  three 

bits  logically;  the  three  least  significant  bits 

are  all  cleared. 
Carry  =  I ,  since  the  last  bit  shifted  from  the 

leftmost  bit  position  was  1. 
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Title 
Name: 


Multiple-Precision  Logical  Shift  Left 
MPLSL 


Purpose: 
Entry: 


Exit: 


Logical  shift  left  a  multi-byte  operand 
N  bits 

Register  pair  HL  =  Base  address  of  operand 
Register  B  =  Length  of  operand  in  bytes 
Register  C  =  Number  of  bits  to  shift 

The  operand  is  stored  with  ARRAYCOl  as  its 

least  significant  byte  and  ARRAY C LENGTH- 13 

its  most  significant  byte,  where  ARRAY 
is  its  base  address. 

Operand  shifted  left  filling  the  least 
significant  bits  with  zeros 
CARRY  :=  Last  bit  shifted  from 
most  significant  position 


Registers  used:  AF,BC,DE 
Time: 


Size; 


31  cycles  overhead  plus 
((34  «  length)  +  27)  cycles  per  shift 

Program  21  bytes 


MPLSL: 


SEXIT  IF  NUMBER  OF  SHIFTS  OR  LENGTH  OF  OPERAND  IS  0 
J  OR  CLEARS  CARRY  IN  EITHER  CASE 


LD 

OR 

RET 

LD 

OR 

RET 


A 
Z 

A,B 

A 

Z 


; RETURN  IF  NUMBER  OF  SHIFTS  IS  O 


! RETURN  IF  LENGTH  OF  OPERAND  IS  0 


LOOP! 


J  LOOP  ON  NUMBER  OF  SHIFTS  TO  PERFORM 
?A  =  LENGTH  OF  OPERAND 
;C  =  NUMBER  OF  SHIFTS 

jHL  =  ADDRESS  OF  LEAST  SIGNIFICANT  (FIRST)  BYTE  OF  OPERAND 
SCARRY  =  0  INITIALLY  FOR  LOGICAL  SHIFT 


LD 
LD 
LD 
OR 


E,L 
D,H 
B,A 
A 


SSAVE  ADDRESS  OF  LSB 

?B  =  LENGTH  OF  OPERAND 

; CLEAR  CARRY  FOR  LOGICAL  SHIFT 
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J  ROTATE  BYTES  STARTING  WITH  LEAST  SIGNIFICANT 

LSLLP: 


RL 

(HL) 

J  ROTATE  NEXT  BYTE  LEFT 

INC 

HL 

; INCREMENT  TO  MORE  SIGNIFICANT 

DJNZ 

LSLLP 

LD 

L,E 

; RESTORE  ADDRESS  OF  LSE 

LD 

H,D 

DEC 

C 

; DECREMENT  NUMBER  OF  SHIFTS 

JR 

NZ , LOOP 

RET 

SAMPLE  EXECUTION: 


SC7D! 


LD 
LD 
LD 
CALL 


HL,AY 

B.  SZAY 

C,  SHIFTS 
MPLSL 


RESULT 


;HL  =  EASE  ADDRESS  OF  OPERAND 
?B  =  LENGTH  OF  OPERAND  IN  BYTES 
?C  =  NUMBER  OF  SHIFTS 
; SHIFT 
OF  SHIFTING 


IN  MEMORY 


EDCBA987654321H,  4  BITS 
DCBA9S76543210H,  C=0 


AY 

OlOH 

AY+1 

032H 

AY+-2 

054H 

AY+3 

07&H 

AY+4 

098H 

AY+5 

OBAH 

AY+6 

ODCH 

JR 


SC7D 


SDATA  SECTION 

SZAY        EQU  7  ; LENGTH  OF  OPERAND  IN  BYTES 

SHIFTS     EQU  4  ; NUMBER  OF  SHIFTS 

AY:  DB  21H,43H,65H,87H,0A9H,0CBH,0EDH 


END 


Multiple-Precision  Logical  Shift  Riglit 

(MPLSR)  7E 


Shifts  a  multi-byte  operand  right  logically  by 
a  specified  number  of  bit  positions.  The  length 
of  the  operand  (in  bytes)  is  255  or  less.  The 
Carry  flag  is  set  from  the  last  bit  shifted  out  of 
the  rightmost  bit  position.  The  operand  is  stored 
with  its  least  significant  byte  at  the  lowest 
address. 

Procedure:  The  program  clears  the  Carry 
initially  (to  fill  with  a  0  bit)  and  then  shifts  the 
entire  operand  right  one  bit,  starting  with  the 
most  significant  byte.  It  repeats  the  operation 
for  the  specified  number  of  shifts. 


Registers  Used:  AF,  BC,  DE,  hl 

Execution  Time:  NU  M  BER  OF  S HI FTS  *  (35  +34  * 
LENGTH  OF  OPERAND  IN  BYTES)  +  59  cycles 

Program  Size:  26  bytes 

Data  IVlemory  Required:  None 

Special  Cases: 

1.  If  the  length  of  the  operand  is  0,  the  program 
exits  immediately  with  the  operand  unchanged  and 
the  Carry  flag  cleared. 

2.  If  the  number  of  shifts  is  0,  the  program  exits 
immediately  with  the  operand  unchanged  and  the 

C'arry  flag  cleared. 


Entry  Conditions 

Base  address  of  operand  in  HL 
Length  of  operand  in  bytes  in  B 
Number  of  shifts  (bit  positions)  in  C 


Exit  Conditions 

Operand  shifted  right  logically  by  the  specified 
number  of  bit  positions.  (The  most  significant 
bit  positions  are  filled  with  O's.) 

The  Carry  flag  is  set  from  the  last  bit  shifted  out 
of  the  rightmost  bit  position.  Carry  is  cleared 
if  either  the  number  of  shifts  or  the  length  of 
the  operand  is  0. 


Examples 

1.     Data:     Length  of  the  operand  (in  bytes)  =  08 
Operand  =  85A4C719FE06741E,(, 
Number  of  shifts  =  04 

Result:     Shifted  operand  =  085A4C719FE06741 

This  is  the  original  operand  shifted  right 
four  bits  logically;  the  four  most  significant 
bits  are  all  cleared. 
Carry  =  1 ,  since  the  last  bit  shifted  from  the 
rightmost  bit  position  was  I. 


2.     Data:      Length  of  operand  (in  bytes)  =  04 
Operand  =  3F6A42D3|6 
Number  of  shifts  =  03 

Result:      Shifted  operand  =  07ED485A|j 

This  is  the  original  operand  shifted  right  three 

bits  logically;  the  three  most  significant  bits 

are  all  cleared. 
Carry  =  0,  since  the  last  bit  shifted  from  the 

rightmost  bit  position  was  0. 
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Title 
Name : 


Multiple-Precision  Logical  Shift  Right 
MPLSR 


Purpose: 
Entry: 


Exit: 


Logical  shift  right  a  rnulti-byte  operand  N  bits 

Register  pair  HL  =  Base  address  of  operand 
Register  B  =  Length  of  operand  in  bytes 
Register  C  =  Number  of  bits  to  shift 

The  operand  is  stored  with  ARRAYC03  as  its 
least  significant  byte  and  ARRAYCLENGTH-1 3 
its  most  significant  byte,  where  ARRAY 
is  its  base  address. 

Operand  shifted  right  filling  the  most 
significant  bits  with  zeros 


CARRY 


Last  bit  shifted  from  least 
significant  position 


Registers  used:  AF,BC,DE,HL 


Time: 


59  cycles  overhead  plus 

{.(34  K  length)  +  35.)  cycles  per  shift 

Program  26  bytes 


MPLSR: 


sEXIT  IF  NUMBER  OF  SHIFTS  OR  LENGTH  OF  OPERAND  IS  0 
SOR  CLEARS  CARRY  IN  EITHER  CASE 
LD  A,C 
OR  A 

RET  2  ; RETURN  IF  NUMBER  OF  SHIFTS  IS  0 

LD  A,B 
OR  A 

RET  Z  ; RETURN  IF  LENGTH  OF  OPERAND  IS  0 

; CALCULATE  ADDRESS  OF  MOST  SIGNIFICANT  (.LAST)  BYTE 

l-D  E,B  ;  ADDRESS  OF  MSB  =  BASE  +  LENGTH- 1 

LD  D,0 

ADD  HL,DE 

DEC  HL  ;HL  =  ADDRESS  OF  MSB 

jC  =  NUMBER  OF  SHIFTS 
;A  =  LENGTH  OF  OPERAND 

;LOOP  ON  NUMBER  OF  SHIFTS  TO  PERFORM 

; START  WITH  CARRY  =  0  FOR  LOGICAL  SHIFT 
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LOOP: 


LSRLP; 


OR 
LD 
LD 
LD 


A 

B.A 
E,L 
D,H 


! CLEAR  CARRY  FOR  LOGICAL  SHIFT 
fE  =  LENGTH  OF  OPERAND 
;SAVE  ADDRESS  OF  MSB 


! ROTATE  BYTES  STARTING  WITH  MOST  SIGNIFICANT 


RR 

DEC 

DJNZ 

LD 

LD 

DEC 

JR 

RET 


(HL) 
HL 

LSRLP 
L,E 
H,D 
C 

NZ , LOOP 


; ROTATE  A  BYTE  RIGHT 

; DECREMENT  TO  LESS  SIGNIFICANT  BYTE 

? RESTORE  ADDRESS  OF  MSB 

J  DECREMENT  NUMBER  OF  SHIFTS 


SAMPLE  EXECUTION! 


SC7E! 


LD  HL,AY         ;HL  =  BASE  ADDRESS  OF  OPERAND 

LD  B,SZAY       ',B  =  LENGTH  OF  OPERAND  IN  BYTES 

LD  C, SHIFTS  ;C  =  NUMBER  OF  SHIFTS 

CALL        MPLSR         ; SHIFT 

RESULT  OF  SHIFTING 


IN  MEMORY 


EDCBA987654321H, 
0EDCBA98765432H, 


4  BITS 
C=0 


IS 


AY 

032H 

AY+1 

054H 

AY+2 

076H 

AY+3 

098H 

AY+4 

OEAH 

AY+5 

ODCH 

AY+6 

OOEH 

JR 


SC7E 


SZAY 

SHIFTS 

AY: 


jDATA  SECTION 
EQU  7 
EQU  4 


; LENGTH  OF  OPERAND  IN  BYTES 
; NUMBER  OF  SHIFTS 


DB 


2 1 H , 43H , 65H , 87H , 0A9H , OCBH , OEDH 


END 


Multiple-Precision  Rotate  Right  (MPRR) 


7F 


Rotates  a  multi-byte  operand  right  by  a  spec- 
ified number  of  bit  positions  as  if  the  most  signif- 
icant bit  and  least  significant  bit  were  connected. 
The  length  of  the  operand  (in  bytes)  is  255  or 
less.  The  Carry  flag  is  set  from  the  last  bit  shifted 
out  of  the  rightmost  bit  position.  The  operand  is 
stored  with  its  least  significant  byte  at  the  lowest 
address. 

Procedure;  The  program  shifts  bit  0  of  the 
least  significant  byte  of  the  operand  to  the  Carry 
flag  and  then  rotates  the  entire  operand  right 
one  bit,  starting  with  the  most  significant  byte.  It 
repeats  the  operation  for  the  specified  number 
of  rotates. 


Registers  Used:  AF,  BC,  DE,  HL,  IX 

Execution  Time:  NUMBER  OF  ROTATES  *  (58  + 
34  *  LENGTH  OF  OPERAND  IN  BYTES)  +  8.3 
cycles 

Program  Size:  33  bytes 

Data  Memory  Required:  None 

Speciai  Cases: 

1.  If  the  length  of  the  operand  is  0,  the  program 
exits  immediately  with  the  operand  unchanged  and 
the  Carry  flag  cleared. 

2.  If  the  number  of  rotates  is  0,  the  program  exits 
immediately  with  the  operand  unchanged  and  the 
Carry  flag  cleared. 


Entry  Conditions 

Base  address  of  operand  in  HI, 
Length  of  operand  in  bytes  in  B 
Number  of  rotates  (bit  positions)  in  C 


Exit  Conditions 

Operand  rotated  right  logically  by  the  specified 
number  of  bit  positions  (the  most  significant  bit 
positions  are  filled  from  the  least  significant  bit 
positions).  The  Carry  flag  is  set  from  the  last  bit 
shifted  out  of  the  rightmost  bit  position.  Carry  is 
cleared  if  either  the  number  of  rotates  or  the 
length  of  the  operand  is  0. 


Examples 

I.  Data:  Length  of  operand  (in  bytes)  =  08 
Operand  =  85A4C719FE06741E,6 
Number  of  rotates  =  04 

Result:     Rotated  operand  =  E85A4C7I9FE06741  ^ 

This  is  the  original  operand  rotated  right  four 
bits;  the  four  most  significant  bits  are  equiv- 
alent to  the  original  four  least  significant 
bits. 

Carry  =  1 ,  since  the  last  bit  shifted  from  the 
rightmost  bit  position  was  1 . 


2.     Data:      L,ength  of  operand  (in  bytes)  =  04 
Operand  =  3F6A42D3|(, 
Number  of  rotates  =  03 

Result:      Rotated  operand  =  67ED485A|6 

This  is  the  original  operand  rotated  right 
three  bits;  the  three  most  significant  bits  are 
equivalent  to  the  original  three  least  signif- 
icant bits. 

Carry  =  0,  since  the  last  bit  shifted  from  the 
rightmost  bit  position  was  0. 
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MPRRs 


Title  Multiple-Precision  Rotate  Right 

Name :  MPRR 


Purpose:  Rotate  right  a  multi-byte  operand  N  bits 

Entry:  Register  pair  HL  =  Ease  address  of  operand 

Register  E  =  Length  of  operand  in  bytes 
Register  C  =  Number  of  bits  to  rotate 

The  operand  is  stored  with  ARRAYCOl  as  its 

least  significant  byte  and  ARRAYCLENGTH-U 

its  most  significant  byte,  where  ARRAY 
is  its  base  address. 

Exit:  Operand  rotated  right 

CARRY  :=  Last  bit  shifted  from  least 
significant  position 

Registers  used:   AF,BC,DE,HL, IX 

Time:  83  cycles  overhead  plus 

((34  «  length)  +  58)  cycles  per  rotate 

Size:  Program  33  bytes 


5  EX  IT  IF  NUMBER  OF  ROTATES  OR  LENGTH  OF  OPERAND  IS  0 
J  OR  CLEARS  CARRY  IN  EITHER  CASE 
LD  A,C 
OR  A 

RET  Z  ! RETURN  IF  NUMBER  OF  ROTATES  IS  0 

LD  A,B 
OR  A 

RET  Z  ; RETURN  IF  LENOTH  OF  OPERAND  IS  0 

{CALCULATE  ADDRESS  OF  MOST  SIGNIFICANT  (LAST)  BYTE 
PUSH  HL 

POP  IX  5 IX  POINTS  TO  LSB  (FIRST  BYTE) 

LD  E,B  5 ADDRESS  OF  MSB  =  EASE  +  LENGTH- 1 

LD  D,0 
ADD  HL,DE 

DEC  HL  ;HL  POINTS  TO  MSB  (LAST  BYTE) 

;C  =  NUMBER  OF  ROTATES 
;A  =  LENGTH  OF  OPERAND 
SLOOP  ON  NUMBER  OF  ROTATES  TO  PERFORM 
; CARRY  =  LEAST  SIGNIFICANT  BIT  OF  ENTIRE  OPERAND 
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LOOP: 


RRLP: 


LD 
RR 
LD 
LD 
LD 


B, (IX+0) 
B 

E,  A 
E,L 
D,H 


;GET  LSB 

; CARRY  =  BIT  0  OF  LSB 

;B  =  LENGTH  OF  OPERAND  IN  BYTES 

jSAVE  ADDRESS  OF  MSB 


J  ROTATE  BYTES  RIGHT  STARTING  WITH  MOST  SIGNIFICANT 


RR 

DEC 

DJNZ 

LD 

LD 

DEC 

JR 

RET 


(HL) 
HL 

RRLP 

L,E 

H,D 

C 

NZ , LOOP 


; ROTATE  A  BYTE  RIGHT 

? DECREMENT  TO  LESS  SIGNIFICANT  BYTE 

; RESTORE  ADDRESS  OF  MSB 

; DECREMENT  NUMBER  OF  ROTATES 


SAMPLE  EXECUTION: 


SC7F; 


LD 
LD 
LD 
CALL 


HL,AY 
B,S2AY 
CROTATS 
MPRR 


;BASE  ADDRESS  OF  OPERAND 
; LENGTH  OF  OPERAND  IN  BYTES 
! NUMBER  OF  ROTATES 


ROTATE 


RESULT  OF  ROTATING 

EDCBA987654321H, 

4  BITS 

1EDCBA98765432H, 

C=0 

IN  MEMORY  AY 

032H 

AY+1  = 

054H 

AY+2  = 

076H 

AY+3  = 

093H 

AY+4  = 

OBAH 

AY+5  = 

ODCH 

AY+6  = 

OlEH 

JR 


SC7F 


SZAY 

ROTATS 

AYs 


jDATA  SECTION 
EQU  7 
EQU  4 


; LENGTH  OF  OPERAND  IN  BYTES 
J  NUMBER  OF  ROTATES 


DB 


21 H, 43H, 65H, S7H, 0A9H, OCBH, OEDH 


END 


Multiple-Precision  Rotate  Left  (MPRL) 


7G 


Rotates  a  multi-byte  operand  left  by  a  speci- 
fied number  of  bit  positions  as  if  the  most  signif- 
icant bit  and  least  significant  bit  were  connected. 
The  length  of  the  operand  (in  bytes)  is  255  or 
less.  The  Carry  flag  is  set  from  the  last  bit  shifted 
out  of  the  leftmost  bit  position.  The  operand  is 
stored  with  its  least  significant  byte  at  the  lowest 
address. 

Procedure:  The  program  shifts  bit  7  of  the 
most  significant  byte  of  the  operand  to  the 
Carry  flag.  It  then  rotates  the  entire  operand  left 
one  bit,  starting  with  the  least  significant  byte.  It 
repeats  the  operation  for  the  specified  number 
of  rotates. 


Registers  Used:  AF,  BC,  DE,  HL,  IX 

Execution  Time:  NUMBER  OF  ROTATES  *  (58  + 
34  *  LENGTH  OF  OPERAND  IN  BYTES)  +  104 
cycles 

Program  Size:  35  bytes 

Data  Memory  Required:  None 

Special  Cases: 

1 .  If  the  length  of  the  operand  is  0,  the  program 
exits  immediately  with  the  operand  unchanged  and 
the  Carry  flag  cleared. 

2.  If  the  number  of  rotates  is  0,  the  program  exits 
immediately  with  the  operand  unchanged  and  the 
Carry  flag  cleared. 


Entry  Conditions 

Base  address  of  operand  in  HL 
Length  of  operand  in  bytes  in  B 
Number  of  rotates  (bit  positions)  in  C 


Exit  Conditions 

Operand  rotated  left  the  specified  number  of  bit 
positions  (the  least  significant  bit  positions  are 
filled  from  the  most  significant  bit  positions). 
The  Carry  flag  is  set  from  the  last  bit  shifted  out 
of  the  leftmost  bit  position.  Carry  is  cleared  if 
either  the  number  of  rotates  or  the  length  of  the 
operand  is  0. 


Examples 

I.  Data:  Length  of  operand  (in  bytes)  =  08 
Operand  =  85A4C719FE06741E|j 
Number  of  rotates  =  04 

Resuh:     Rotated  operand  =  5A4C7I9FE06741E8,5 

This  is  the  original  operand  rotated  left  four 
bits;  the  four  least  significant  bits  are  equiv- 
alent to  the  original  four  most  significant 
bits. 

Carry  =  0,  since  the  last  bit  shifted  from  the 
leftmost  bit  position  was  0. 


2.     Data:      Length  of  operand  (in  bytes)  =  04 
Operand  =  3F6A42D3|(, 
Number  of  rotates  =  03 

Resuh:     Rotated  operand  =  FB521699|(, 

This  is  the  original  operand  rotated  left  three 
bits;  the  three  least  significant  bits  are  equiv- 
alent to  the  original  three  most  significant 
bits. 

Carry  =  1 ,  since  the  last  bit  shifted  from  the 
leftmost  bit  position  was  1 . 
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Multiple-Precision  Rotate  Left 
MPRL 


Rotate  left  a  rnulti-byte  operand  N  bits 

Register  pair  HL  =  Base  address  of  operand 
Register  B  =  Length  of  operand  in  bytes 
Register  C  =  Number  of  bits  to  rotate 

The  operand  is  stored  with  ARRAYCOl  as  its 
least   significant  byte  and  ARRAY C LENGTH- U 
its  most  significant  byte,  where  ARRAY 
is  its  base  address. 

Operand  rotated  left 
CARRY  :=  Last  bit   shifted  from  most 
significant  position 

Registers  used:   AF, BC, DE, HL, IX 

Time:  104  cycles  overhead  plus 

((34  »  length)  +  58)  cycles  per  rotate 

Sizes  Program  35  bytes 


MPRL: 


jEXIT 

IF  NUMBER 

OF 

ROTATES  OR  LENGTH  OF  OPERAND  IS  0 

J  OR  CLEARS  CARRY 

IN  EITHER  CASE 

LD 

A,C 

OR 

A 

RET 

Z 

f RETURN  IF  NUMBER  OF  ROTATES  IS 

0 

LD 

A,B 

OR 

A 

RET 

Z 

f RETURN  IF  LENGTH  OF  OPERAND  IS 

0 

! CALCULATE  ADDRESS 

OF  MOST  SIGNIFICANT  (LAST)  BYTE 

PUSH 

HL 

;SAVE  ADDRESS  OF  FIRST  BYTE 

LD 

E,E 

;  ADDRESS  OF  MSB  =  BASE  +  LENGTH- 1 

LD 

D,  0 

ADD 

HL,DE 

DEC 

HL 

PUSH 

HL 

POP 

IX 

!IX  POINTS  TO  MOST  SIGNIFICANT  BYTE 

POP 

HL 

;HL  POINTS  TO  LEAST  SIGNIFICANT 

BYTE 

;C  =  NUMBER  OF  ROTATES 

5  A  =  LENGTH  OF  OPERAND 

jLOOP 

ON  NUMBER 

OF 

ROTATES  TO  PERFORM 

Title 
Name: 


Purposes 
Entry: 


Exit : 
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LOOP: 


; CARRY  =  MOST  SIGNIFICANT  BIT  OF  ENTIRE  OPERAND 


RLLP: 


LD 

B, ( IX+0) 

;GET  MOST  SIGNIFICANT  BYTE 

rsL. 

; CARRY  =  BIT  7  OF  MSB 

LD 

B,  A 

;B  =  LENGTH  OF  OPERAND  IN  BYTES 

LD 

E,  L 

SSAVE  ADDRESS  OF  LSB 

LD 

D,H 

; ROTATE 

BYTES  LEFT 

STARTING  WITH  LEAST  SIGNIFICANT 

RL 

(HL) 

[ROTATE  A  BYTE  LEFT 

INC 

HL 

; INCREMENT  TO  MORE  SIGNIFICANT  BYTE 

DJNZ 

RLLP 

LD 

L,E 

; RESTORE  ADDRESS  OF  LSB 

LD 

H,D 

DEC 

C 

J  DECREMENT  NUMBER  OF  ROTATES 

■JR 

NZ,LOOP 

RET 

SAMPLE  EXECUTION: 


SC7G: 


LD 
LD 
LD 
CALL 


HL,  AY 
BrSZAY 
C, ROT ATS 
MPRL 


sHL  =  BASE  ADDRESS  OF  OPERAND 
}B  =  LENGTH  OF  OPERAND  IN  BYTES 
fC  =  NUMBER  OF  ROTATES 


ROTATE 
RESULT  OF 


ROTATING 


IN  MEMORY 


EDCBA987654321H, 
DCEA9S7654321EH, 


4  BITS  IS 
C=0 


AY 

OlEH 

AY+1 

032H 

AY+2 

054H 

AY +3 

07/i.H 

AY+4 

09eH 

AY+5 

OBAH 

AY+6 

ODCH 

JR 


SC7G 


SZAY 

ROTATS 

AY! 


jDATA  SECTION 
EQU  7 
EQU  4 


; LENGTH  OF  OPERAND  IN  BYTES 
! NUMBER  OF  ROTATES 


DB 


21H, 43H, 65H, 87H, 0A9H, OCBH, OEDH 


END 


string  Compare  (STRCMP) 


8A 


Registers  Used:  af,  bc,  de,  hl 
Execution  Time: 

1.  If  the  strings  are  not  identical  through  the 
lengthof  the  shorter,  the  time  is  91  +  60  *  NUMBER 
OF  CHARACTERS  COMPARED.  If,  for  example, 
the  routine  compares  five  characters  before  finding  a 
disparity,  the  execution  time  is 

91  +  60  *  5  =  91  +  300  =  391  cycles 

2.  If  the  strings  are  identical  through  the  length  of 
the  shorter,  the  time  is  131  +  60  *  LENGTH  OF 
SHORTER  STRING.  If,  for  example,  the  shorter 
string  is  eight  bytes  long,  the  execution  time  is 

131  +  60  *  8  =  131  +  480  =  611  cycles 
Program  Size:  32  bytes 

Data  Memory  Required:  Two  bytes  anywhere  in 
RAM  for  the  lengths  of  the  strings  (addresses 
LENSl  and  LENS2). 


Compares  two  strings  and  sets  the  Carry  and 
Zero  flags  appropriately.  The  Zero  flag  is  set  to  1 
if  the  strings  are  identical  and  to  0  otherwise. 
The  Carry  flag  is  set  to  1  if  the  string  with  the 
base  address  in  DE  (string  2)  is  larger  than  the 
string  with  the  base  address  in  H  L  (string  1 );  the 
Carry  flag  is  set  to  0  otherwise.  The  strings  are  a 
maximum  of  255  bytes  long  and  the  actual 
characters  are  preceded  by  a  byte  containing  the 
length.  If  the  two  strings  are  identical  through 
the  length  of  the  shorter,  the  longer  string  is 
considered  to  be  larger. 

Procedure:  The  program  first  determines  which 
string  is  shorter  from  the  lengths  that  precede 
the  actual  characters.  It  then  compares  the 
strings  one  byte  at  a  time  through  the  length  of 
the  shorter.  The  program  exits  with  the  flags  set 
if  it  finds  corresponding  bytes  that  differ.  If  the 
strings  are  the  same  through  the  length  of  the 


Entry  Conditions 

Base  address  of  string  2  in  DE 
Base  address  of  string  1  in  HL 


shorter,  the  program  sets  the  flags  by  comparing 
the  lengths. 


Exit  Conditions 

Flags  set  as  if  string  2  had  been  subtracted  from 
string  1 .  If  the  strings  are  the  same  through 
the  length  of  the  shorter,  the  flags  are  set  as  if 
the  length  of  string  2  had  been  subtracted 
from  the  length  of  string  1 . 

Zero  flag  =  1  if  strings  are  identical,  0  if  they  are 
not. 

Carry  flag  =  1  if  string  2  is  larger  than  string  1 , 0 
if  they  are  identical  or  string  I  is  larger.  If  the 
strings  are  the  same  through  the  length  of  the 
shorter,  the  longer  one  is  considered  to  be 
larger. 
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Examples 

I.     Data:     String  1  =  05'PRINT' (05  is  the  length  of  the 
string) 

String  2  =  03'END'  (03  is  the  length  of  the 
string) 

Result:     Zero  flag  =  0  (strings  are  not  identical) 

Carry  flag  =  0  (string  2  is  not  larger  than 
string  I) 


2.     Data:      String  1  =  05'PRINT' (05  is  the  length  of  the 
string) 

String  2  =  02'PR'  (02  is  the  length  of  the 
string) 

Result:     Zero  flag  =  0  (strings  are  not  identical) 

Carry  flag  =  0  (string  2  is  not  larger  than 
string  I) 

The  longer  string  (string  1)  is  considered  to  be 
larger.  If  you  want  to  determine  whether  string  2 
is  an  abbreviation  of  string  1,  you  could  use 
Subroutine  8C  (Find  the  Position  of  a  Substring) 
and  determine  whether  string  2  was  part  of 
string  1  and  started  at  the  first  character. 

We  are  assuming  here  that  the  strings  consist 


3.     Data:     String  1  =  05'PRINT'  (05  is  the  length  of  the 
string) 

String  2  =  06'SYSTEM'  (06  is  the  length  of 
the  string) 

Result:     Zero  flag  =  0  (strings  are  not  identical) 

Carry  flag=  1  (string  2  is  larger  than  string  1) 

of  ASCII  characters.  Note  that  the  byte  preceding 
the  actual  characters  contains  a  hexadecimal 
number  (the  length  of  the  string),  not  a  character. 
We  have  represented  this  byte  as  two  hexadecimal 
digits  in  front  of  the  string.  The  string  itself  is 
shown  surrounded  by  single  quotation  marks. 
These  serve  only  to  delimit  strings  in  the  examples; 
they  are  not  actually  part  of  the  data.  This 
format  is  used  to  display  string  data  in  the 
examples  throughout  this  chapter. 

This  routine  treats  spaces  like  other  charac- 
ters. If,  for  example,  the  strings  are  ASCII,  the 
routine  will  find  that  SPRINGMAID  is  larger 
than  SPRING  MAID,  since  an  ASCII  M  (4Di6) 
is  larger  than  an  ASCII  space  (20]6). 


Title  String  compare 

Name  s  STRCMP 


Purpose:  Compare  2  strings  and  return  C  and  Z  flags  set 

or  cleared 

Entry!  Register  pair  HL  =  Base  address  of  string  1 

Register  pair  DE  =  Base  address  of  string  2 

A  string  is  a  maximum  of  255  bytes  long  plus 
a  length  byte  which  precedes  it. 
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Exit: 


IF  string  1  =  string  2  THEN 

Z=1,C=0 
IF  string  1  >  string  2  THEN 

z=o,c=o 

IF  string  1  <  string  2  THEN 
Z=0,C=1 


Registers  used:  AF,BC,DE,HL 
Time: 


Size: 


91  cycles  overhead  plus  60  cycles  per  byte  plus 
40  cycles  if  strings  are  identical 
through  length  of  shorter 

Program  32  bytes 
Data  2  bytes 


STRCMP; 


jDETERHlNE  WHICH  STRING  IS  SHORTER 


BEOCMP: 


CMPLP: 


CMPLEN: 


LENSl: 
LENS2: 


; LENGTH 

OF  SHORTER 

=  NUMBER  OF  BYTES  TO  COMPARE 

LD 

A, (HL) 

J  SAVE  LENGTH  OF  STRING  1 

LD 

(LENSl), A 

LD 

A, (DE) 

?SAVE  LENGTH  OF  STRING  2 

LD 

(LENS2),A 

CP 

(HL) 

; COMPARE  TO  LENGTH  OF  STRING  1 

JR 

CEEGCMP 

;JUMP  IF  STRING  2  IS  SHORTER 

LD 

A, (HL) 

;ELSE  STRING  1   IS  SHORTER 

J  COMPARE  STRINGS  THROUGH  LENGTH  OF  SHORTER 

OR 

A 

jTEST  LENGTH  OF  SHORTER  STRING 

JR 

Z , CMPLEN 

! COMPARE  LENGTHS 

f    IF  LENGTH  IS  ZERO 

LD 

B,A 

;B  =  NUMBER  OF  BYTES  TO  COMPARE 

EX 

DE,HL 

?DE  =  STRING  1 

SHL  =  STRING  2 

INC 

HL 

? INCREMENT  TO  NEXT  BYTES 

INC 

DE 

LD 

A, (DE) 

;GET  A  BYTE  OF  STRING  1 

CP 

(HL) 

; COMPARE  TO  BYTE  OF  STRING  2 

RET 

NZ 

; RETURN  WITH  FLAGS  SET  IF  BYTES 

;   NOT  EQUAL 

DJNZ 

CMPLP 

! CONTINUE  THROUGH  ALL  BYTES 

; STRINGS  SAME  THROUGH  LENGTH  OF  SHORTER 

SSO  USE 

LENGTHS  TO 

SET  FLAGS 

LD 

A, (LENSl) 

; COMPARE  LENGTHS 

LD 

HL,LENS2 

CP 

(HL) 

RET 

! RETURN  WITH  FLAGS  SET  OR  CLEARE 

jDATA 

DS 

1 

; LENGTH  OF  STRING  1 

DS 

1 

! LENGTH  OF  STRING  2 
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SAMPLE  EXECUTION: 


SC8A: 


LD 
LD 

CALL 


JR 


HL,S1 
DE,S2 
STRCMP 


SC8A 


;BASE  ADDRESS  OF  STRING  1 
J  BASE  ADDRESS  OF  STRING  2 
; COMPARE  STRINGS 

? COMPARING  "STRING  1"  AND  "STRING  2" 
;   RESULTS  IN  STRING  1  LESS  THAN 
;   STRING  2,   SO  Z=0,C=I 

J  LOOP  FOR  ANOTHER  TEST 


Si! 

S2: 


DB 
DB 


20H, 'STRING  1 
20H, 'STRING  2 


END 


string  Concatenation  (CONCAT) 


8B 


Combines  (concatenates)  two  strings,  placing 
the  second  immediately  after  the  first  in  memory. 
If  the  concatenation  produces  a  string  longer 
than  a  specified  maximum,  the  program  con- 
catenates only  enough  of  string  2  to  give  the 
combined  string  its  maximum  length.  The  Carry 
flag  is  cleared  if  all  of  string  2  can  be  concatenated 
or  set  to  1  if  part  of  string  2  must  be  dropped. 
Both  strings  are  a  maximum  of  255  bytes  long 
and  the  actual  characters  are  preceded  by  a  byte 
containing  the  length. 

Procedure:  The  program  uses  the  length  of 


string  1  to  determine  where  to  start  adding  char- 
acters and  the  length  of  string  2  to  determine  how 
many  characters  to  add.  If  the  sum  of  the  lengths 
exceeds  the  maximum,  the  program  indicates  an 
overflow  and  reduces  the  number  of  characters  it 
must  add  (the  number  is  the  maximum  length 
minus  the  length  of  string  1).  It  then  moves  the 
appropriate  number  of  characters  from  string  2 
to  the  end  of  string  1 ,  updates  the  length  of  string 
1 ,  and  sets  the  Carry  flag  to  indicate  whether  any 
characters  were  discarded. 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  Approximately  21  *  NUMBER 
OF  CHARACTERS  CONCATENATED  plus  288 
cycles  overhead.  NUMBER  OF  CHARACTERS 
CONCATENATED  is  normally  the  length  of  string 
2,  but  it  will  be  the  maximum  length  of  string  1  minus 
its  current  length  if  the  combined  string  would  be  too 
long.  Ifjor  example,  NUMBER  OFCHARACTERS 
CONCATENATED  is  14,(,  (20,o),  the  execution  time 
is 

21  *  20  +  288  =  420  +  288  =  708  cycles 
Program  Size:  8.3  bytes 

Data  Memory  Required:  Five  bytes  anywhere  in 
RAM  for  the  base  address  of  string  1  (2  bytes  starting 
at  address  SI  ADR),  the  lengths  of  the  strings 
(addresses  SILEN  and  S2L,EN),  and  a  flag  that 


indicates  whether  the  combined  strings  overflowed 
(address  STRGOV). 

Special  Cases: 

1.  If  concatenating  would  make  the  string  longer 
than  its  specified  maximum  length,  the  program 
concatenates  only  enough  of  string  2  to  reach  the 
maximum.  If  any  of  string  2  must  be  truncated,  the 
Carry  flag  is  set  to  1 . 

2.  If  string  2  has  a  length  of  0,  the  program  exits 
with  the  Carry  flag  cleared  (no  errors)  and  string  I 
unchanged.  That  is,  a  length  of  0  for  either  string  is 
interpreted  as  0,  not  as  256. 

.3.  If  the  original  length  of  string  1  exceeds  the 
specified  maximum,  the  program  exits  with  the 
Carry  flag  set  to  I  (indicating  an  error)  and  string  I 
unchanged. 


Entry  Conditions 


Exit  Conditions 


Base  address  of  string  2  in  DE 
Base  address  of  string  1  in  HL 
Maximum  length  of  string  1  in  B 


String  2  concatenated  at  the  end  of  string  1  and 
the  length  of  string  1  increased  appropriately.  If 
the  resulting  string  would  exceed  the  maximum 
length,  only  the  part  of  string  2  that  would  give 
string  I  its  maximum  length  is  concatenated.  If 
any  part  of  string  2  must  be  dropped,  the  Carry 
flag  is  set  to  1.  Otherwise,  the  Carry  flag  is 
cleared. 
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Examples 


1.     Data:      Maximum  length  of  string  1  =  0E|(,=  H^q 
String  1  =  07'JOHNSON'  (07  is  the  length  of 
the  string) 

String  2  =  05',DON'  (05  is  the  length  of  the 
string) 

Resuh;  String  1  =  OCJOHNSON,  DON'(0C|t,=  12,o 
is  the  length  of  the  combined  string  with 
string  2  placed  after  string  1) 
Carry  =  0,  since  the  concatenation  did  not 
produce  a  string  exceeding  the  maximum 
length. 

Note  that  we  are  representing  the  initial  byte 
(containing  the  length  of  the  string)  as  two 
hexadecimal  digits  in  both  examples. 


Data;     String  1  =  07'JOHNSON' (07  is  the  length  of 
the  string) 

String  2=  09',RICHARD  (O9  is  the  length  of 
the  string) 

Result:  String  I  =  OE'JOHNSON,  RICHA'  (OEi^  = 
14|()  is  the  maximum  length  allowed,  so  the 
last  two  characters  of  string  2  have  been 
dropped) 

Carry  =  I,  since  the  concatenation  produced 
a  string  longer  than  the  maximum  length. 


Title 
Name; 


String  Concatenation 
CONCAT 


Purposes 
Entry! 


Exit: 


Concatenate  2  strings  into  one  string 

Register  pair  HL  =  Base  address  of  string  1 
Register  pair  DE  =  Base  address  of  string  2 
Register  B  =  Maximum  length  of  string  1 

A  string  is  a  maximum  of  255  bytes  long  plus 
a  length  byte  which  precedes  it. 

String  1  !=  string  1  concatenated  with  string  J 
If  no  errors  then 

CARRY  !=  0 
else 

begin 

CARRY  !=  1 

if  the  concatenation  makes  string  1  too 
long,  concatenate  only  enough  of  string  2 
to  give  string  1  its  maximum  length, 
if  lengthCstringl)  >  maximum  length  then 
no  concatenation  is  done 

end; 
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Registers  used:  AF,BC,DE,HL 


Times 


Approximately  21  »  (length  of  string  2.)  cycles 
plus  288  cycles  overhead 


Size; 


Program  83  bytes 
Data  5  bytes 


CONCAT: 


; DETERMINE  WHERE  TO  START  CONCATENATING 

5 CONCATENATION  STARTS  AT  THE  END  OF  STRING  1 

;END  OF  STRING  1  =  BASEl  +  LENGTHl  +  1,  WHERE 

5     THE  EXTRA  1  MAKES  UP  FOR  THE  LENGTH  BYTE 

SNEW  CHARACTERS  COME  FROM  STRING  2,   STARTING  AT 

?     BASE2  +  1   (SKIPPING  OVER  LENGTH  BYTE) 

LD  (S1ADR),HL  ; SAVE  ADDRESS  OF  STRING  1 

PUSH        BC  ;SAVE  MAXIMUM  LENGTH  OF  STRING  1 

LD  A,  (HL.)  sSAVE  LENGTH  OF  STRING  1 

LD  (SILEN),A 

LD  C,A  jENDl  =  BASEl  +  LENGTHl  +  1 

LD  B,0 
ADD  HL,BC 

INC  HL  ;HL  =  START  OF  CONCATENATION 

LD  A, (DE)  ;SAVE  LENGTH  OF  STRING  2 

LD  (S2LEN),A 

INC  DE  ;DE  =  FIRST  CHARACTER  OF  STRING  2 

POP  BC  ; RESTORE  MAXIMUM  LENGTH 

5 DETERMINE  HOW  MANY  CHARACTERS  TO  CONCATENATE 

LD  C,A  ;ADD  LENGTHS  OF  STRINGS 

LD  A,  (SILEN.) 

ADD  A,C 

JR  CTOOLNG  ;JUMP  IF  SUM  EXCEEDS  255 

CP  B  ; COMPARE  TO  MAXIMUM  LENGTH 

JR  Z,LENOK  fJUMP  IF  NEW  STRING  IS  MAX  LENGTH 

JR  CLENOK  ;    OR  LESS 

; COMBINED  STRING  IS  TOO  LONG 

;    INDICATE  A  STRING  OVERFLOW,   STRGOV  :=  OFFH 

;  NUMBER  OF  CHARACTERS  TO  CONCATENATE  =     MAXLEN  -  SILEN 

f   LENGTH  OF  STRING  1  =  MAXIMUM  LENGTH 


TOOLNG: 


LD 

LD 

LD 

LD 

LD 

SUB 

RET 

LD 

LD 

LD 

JR 


A,  OFFH 

(STRGOV), A 

A, (SILEN) 

C,  A 

A,B 

C 

C 

(S2LEN) , A 
A,B 

(SILEN), A 
DOCAT 


SEXIT  IF  ORIGINAL  STRING  TOO  LONG 
; CHANGE  S2LEN  TO  MAXLEN  -  SILEN 
; LENGTH  OF  STRING  1  =  MAXIMUM 


; PERFORM  CONCATENAT I ON 


; INDICATE  STRING  OVERFLOW 


; CALCULATE  MAXLEN  -  SILEN 
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LENOK: 


DOCAT: 


EXIT! 


RESULTING  LENGTH  DOES  NOT  EXCEED  MAXIMUM 
LENGTH  OF  STRING  1  =  SILEN  +  S2LEN 
INDICATE  NO  OVERFLOW,   STRGOV  :=  0 

NUMBER  OF  CHARACTERS  TO  CONCATENATE  =  LENGTH  OF  STRING  2 


LD 

SUB 

LD 


(SILEN), A 
A 

(  STRGOV  .1 ,  A 


jSAVE  SUM  OF  LENGTHS 
! INDICATE  NO  OVERFLOW 


; CONCATENATE  STRINGS  BY  MOVING  CHARACTERS  FROM  STRING  2 
t  TO  END  OF  STRING  1 


SIADR: 
SILEN: 
S2LEN! 
STRGOV:  DS 


LD 
OR 
JR 
LD 
LD 
EX 

LDIR 


LD 

LD 

LD 

LD 

RRA 

RET 

SDATA 
DS 
DS 
DS 


A, tS2LEN> 
A 

Z,EXIT 
C,A 
E,0 
DE,HL 


A,  (SILEN.) 
HL, (SIADR) 
(HL), A 
A, (STRGOV) 


;GET  NUMBER  OF  CHARACTERS 

J  EX  IT  IF  NOTHING  TO  CONCATENATE 
;BC  =  NUMBER  OF  CHARACTERS 

;DE  =  DESTINATION 
jHL  =  SOURCE 
jMOVE  CHARACTERS 


; ESTABLISH  NEW  LENGTH  OF  STRING  1 
; CARRY  =  1   IF  OVERFLOW,   0  IF  NOT 


jBASE  ADDRESS  OF  STRING 
; LENGTH  OF  STRING  1 
; LENGTH  OF  STRING  2 
; STRING  OVERFLOW  FLAG 


SAMPLE  EXECUTION: 


SC8B: 


LD 
LD 
LD 

CALL 


HL,S1 
DE,S2 
B,20H 
CONCAT 


;HL  =  BASE  ADDRESS  OF  SI 

;DE  =  BASE  ADDRESS  OF  S2 

;B  =  MAXIMUM  LENGTH  OF  STRING  1 

; CONCATENATE  STRINGS 


JR 


SC8B 


; RESULT  OF  CONCATENATING 

;    "LASTNAME"  AND  ",  FIRSTNAME" 

!    IS  SI  =  13H, "LASTNAME,  FIRSTNAME" 


;TEST  DATA,   CHANGE  FOR  OTHER  VALUES 
SI:  DB  8H  ; LENGTH  OF  SI 

DB  'LASTNAME 


S32  BYTE  MAX  LENGTH 
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S2:  DB  OBH  5  LENGTH  OF  S2 

DB  FIRSTNAME  ■-   ;  32  BYTE  MAX  LENGTH 

END 


Find  the  Position  of  a  Substring  (POS)  8C 


Searches  for  the  first  occurrence  of  a  substring 
within  a  string.  Returns  the  index  at  which  the 
substring  starts  if  it  is  found  and  0  if  it  is  not 
found.  The  string  and  the  substring  are  both  a 
maximum  of  255  bytes  long,  and  the  actual 
characters  are  preceded  by  a  byte  containing  the 
length.  Thus,  if  the  substring  is  found,  its  starting 
index  cannot  be  less  than  1  or  more  than  255. 


Procedure:  The  program  searches  the  string 
for  the  substring  until  either  it  finds  the  substring 
or  the  remaining  part  of  the  string  is  shorter 
than  the  substring  and  hence  cannot  possibly 
contain  it.  If  the  substring  is  not  in  the  string,  the 
program  clears  the  accumulator;  otherwise,  the 
program  places  the  starting  index  of  the  substring 
in  the  accumulator. 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  Data-dependent,  but  the  overhead 
is  157  cycles,  each  successful  match  of  I  character 
takes  56  cycles,  and  each  unsuccessful  match  of  1 
character  takes  148  cycles.  The  worst  case  is  when  the 
string  and  substring  always  match  except  for  the  last 
character  in  the  substring,  such  as 

String  =  'AAAAAAAAB' 

Substring  =  'AAB' 
The  execution  time  in  that  case  is 

(STRING  LENGTH  -  SUBSTRING  LENGTH 
+  1)  *  (56  *  (SUBSTRING  LENGTH  -  1)  + 
148) +  154 

If,  for  example,  STRING  LENGTH  =  9  and  SUB- 
STRING LENGTH  =  3  (as  in  the  case  shown),  the 
execution  time  is 

(9-3-1-  1)*(56*(3~  \)+  148)4-  154=  7*260-f 
154=  1820-1-  154=  1974  cycles 

Program  Size:  69  bytes 

Data  Memory  Required:  Seven  bytes  anywhere  in 
RAM  for  the  base  address  of  the  string  (2  bytes 


starting  at  address  STRING),  the  base  address  of  the 
substring  (2  bytes  starting  at  address  SUBSTG),  the 
length  of  the  string  (address  SLEN),  the  length  of  the 
substring  (address  SUBLEN),  and  the  current  starting 
index  in  the  string  (address  INDEX). 

Special  Cases: 

1.  If  either  the  string  or  the  substring  has  a  length 
of  0,  the  program  exits  with  0  in  the  accumulator, 
indicating  that  it  did  not  find  the  substring. 

2.  If  the  substring  is  longer  than  the  string,  the 
program  exits  with  0  in  the  accumulator,  indicating 
that  it  did  not  find  the  substring, 

3.  If  the  program  returns  an  index  of  I,  the 
substring  may  be  regarded  as  an  abbreviation  of  the 
string.  That  is,  the  substring  occurs  in  the  string, 
starting  at  the  first  character.  A  typical  example 
would  be  a  string  PRINT  and  a  substring  I^R. 

4.  If  the  substring  occurs  more  than  once  in  the 
string,  the  program  will  return  only  the  index  to  the 
first  occurrence  (the  occurrence  with  the  lowest 
starting  index). 


Entry  Conditions 


ixit  Conditions 


Base  address  of  substring  in  DE 
Base  address  of  string  in  HL 


A  contains  index  at  which  first  occurrence  of 
substring  starts  if  it  is  found  and  contains  0  if 
substring  is  not  found. 

297 


298    STRING  MANIPULATION 


Examples 


Data:  String  =  ID'ENTER  SPEED  IN  MILES 
PER  HOUR'  (I  D|6  =  29|o  is  the  length  of 
the  string) 

Substring  =  05'MILES'  (05  is  the  length  of 
the  substring) 

Result:     A  contains  10,5  (I6|q),  the  index  at  which  the 
substring  'MILES'  starts. 


2.     Data:     String  =  IB'SALES  FIGURES  FOR  JUNE 
1981 '  ( 1  B,(,=  27,0  is  the  length  of  the  string) 
Substring  =  04'JUNE'(04  is  the  length  of  the 
substring) 

Result:     A  contains  13 1^  (  19|q),  the  index  at  which  the 
substring  'JUNE'  starts. 


.3.     Data:      String=  lO'LET  YI  =  XI  +  R7'(10|(i=  16|ois 
the  length  of  the  string) 
Substring  =  02'R4'  (02  is  the  length  of  the 
substring) 

Result:  A  contains  0,  since  the  substring  'R4'  does  not 
appear  in  the  string  LET  Yl  =  XI  +  R7. 

4.     Data:      String  =  07'RESTORE'  (07  is  the  length  of 
the  string) 

Substring  =  0.3'RES'  (03  is  the  length  of  the 
substring) 

Result:  A  contains  1 ,  the  index  at  which  the  substring 
'RES'  starts.  An  index  of  1  indicates  that 
the  substring  could  be  an  abbreviation  of 
the  string.  Interactive  programs,  such  as 
BASIC  intepreters  and  word  processors, 
often  use  such  abbreviations  to  save  on 
typing  and  storage. 


Title  Find  the  position  of  a  substring  in  a  string 

Name :  POS 


Purpose;  Search  for  the  first  occurrence  of  a  substring 

within  a  string  and  return  its  starting  inde>!. 
If  the  substring  is  not  found  a  0  is  returned. 

Entry;  Register  pair  HL  =  Base  address  of  string 

Register  pair  DE  =  Ease  address  of  substring 

A  string  is  a  maximum  of  255  bytes  long  plus 
a  length  byte  which  precedes  it. 

Exit:  If  the  substring  is  found  then 

Register  A  =  its  starting  index 
else 

Register  A  =  0 

Registers  used:  AF,BC,DE,HL 


Time: 


Since  the  algorithm  is  so  data-dependent. 
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a  simple  formula  is  impossible;  but  the 
following  statements  are  true,  and  a 
worst  case  is  given. 

154  cycles  overhead 

Each  match  of  1  character  takes  56  cycles 
A  mismatch  takes  148  cycles 


Worst  case  timing  will  be  when  the 
string  and  substring  always  match 
except  for  the  last  character  of  the 
substring,   such  as 

string  =  'AAAAAAAAAB' 

substring  =  'AAB' 


Sizes  Program  69  bytes 

Data         7  bytes 


;SET  UP  TEMPORARIES 

jEXlT  IF  STRING  OR  SUBSTRING  HAS  ZERO  LENGTH 


LD 

(STRING), HL 

{SAVE 

STRING  ADDRESS 

EX 

DE,HL 

LD 

A, (HL) 

;TEST 

LENGTH  OF  SUBSTRING 

OR 

A 

JR 

Z,NOTFND 

jEXIT 

IF  LENGTH  OF  SUBSTRING  =  0 

INC 

HL 

;MOVE 

PAST  LENGTH  BYTE  OF  SUBSTRING 

LD 

(SLIBSTG)  ,HL 

;SAVE 

SUBSTRING  ADDRESS 

LD 

(SUBLEN) , A 

LD 

C,A 

;C  =  SUBSTRING  LENGTH 

LD 

A, (DE) 

;TEST 

LENGTH  OF  STRING 

OR 

A 

JR 

Z,NOTFND 

;EXIT 

IF  LENGTH  OF  STRING  =  0 

J  NUMBER  OF  SEARCHES  =  STRING  LENGTH  -  SUBSTRING  LENGTH 
;  +  1.  AFTER  THAT,  NO  USE  SEARCHING  SINCE  THERE  AREN'T 
;   ENOUGH  CHARACTERS  LEFT  TO  HOLD  SUBSTRING 

•IF  SUBSTRING  IS  LONGER  THAN  STRING,   EXIT  IMMEDIATELY  AND 
;    INDICATE  SUBSTRING  NOT  FOUND 

SUB  C  !A  =  STRING  LENGTH  -  SUBSTRING  LENGTH 

JR  CNOTFND  ;EXIT  IF  STRING  SHORTER  THAN  SUBSTRING 

INC  A  ; COUNT  =  DIFFERENCE  IN  LENGTHS  +  1 

LD  B,  A 

SUE  A  J  INITIAL  STARTING  INDEX  =  0 

LD  (INDEX), A 


! SEARCH  UNTIL  REMAINING  STRING  SHORTER  THAN  SUBSTRING 

SLPl! 

LD  HL, INDEX  ; INCREMENT  STARTING  INDEX 

INC  (HL) 

LD  HL, SUBLEN  ;C  =  LENGTH  OF  SUBSTRING 

LD  C, (HL) 
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LD  HL, (STRING)  ; INCREMENT  TO  NEXT  BYTE  OF  STRING 

INC  HL 

LD  (STRING), HL  ;HL  =  NEXT  ADDRESS  IN  STRING 

LD  DE,(SUBSTG)  ;  DE  =  STARTING  ADDRESS  OF  SUBSTRING 

;C  =  CURRENT  VALUE  OF  COUNT 


;TRY  TO  MATCH  SUBSTRING  STARTING  AT  INDEX 

? MATCH  INVOLVES  COMPARING  CORRESPONDING  CHARACTERS 

;   ONE  AT  A  TIME 

CMPLP: 


LD 

A, (DE) 

J  GET  A  CHARACTER  OF  SUBSTRING 

CP 

(HL) 

; COMPARE  TO  CHARACTER  OF  STRING 

JR 

NZ , SLP2 

jJUMP  IF  NOT  SAME 

DEC 

C 

JR 

Z , FOUND 

jJUMP  IF  SUBSTRING  FOUND 

INC 

HL 

; PROCEED  TO  NEXT  CHARACTERS 

INC 

DE 

JR 

CMPLP 

! ARRIVE 

HERE  IF  MATCH 

FAILS,   SUBSTRING  NOT  YET  FOUND 

DJNZ 

SLPl 

;TRY  NEXT  HIGHER  INDEX  IF 

;   ENOUGH  STRING  LEFT 

JR 

NOTFND 

;ELSE  EXIT  NOT  FOUND 

; FOUND  SUBSTRING,   RETURN  ITS  STARTING  INDEX 

FOUND: 

LD  A, (INDEX)  sSUBSTRING  FOUND,   A  =  STARTING  INDEX 

RET 

; COULD  NOT  FIND  SUBSTRING,   RETURN  0  AS  INDEX 

NOTFND: 

SUB  A  ; SUBSTRING  NOT  FOUND,   A  =  0 

RET 


;DATA 

STRING: 

DS 

2 

;BASE  ADDRESS  OF  STRING 

SUBSTG: 

DS 

2 

jBASE  ADDRESS  OF  SUBSTRING 

SLEN: 

DS 

1 

f LENGTH  OF  STRING 

SUBLEN: 

DS 

1 

; LENGTH  OF  SUBSTRING 

INDEX: 

DS 

1 

; CURRENT  INDEX  INTO  STRING 

SAMPLE  EXECUTION! 


SC8C: 


LD 
LD 

CALL 


HL,STG 

DE,SSTG 

POS 


;HL  =  BASE  ADDRESS  OF  STRING 
!DE  =  BASE  ADDRESS  OF  SUBSTRING 
;FIND  POSITION  OF  SUBSTRING 
;   SEARCHING  "AAAAAAAAAB"  FOR  "AAE" 
;   RESULTS  IN  REGISTER  A  =  3 
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JR  SC8C  jLOOP  FOR  ANOTHER  TEST 

;TEST  DATA,   CHANGE  FOR  OTHER  VALUES 
STG:         DB  OAH  ! LENGTH  OF  STRING 

DE  'AAAAAAAAAB  '  ; 32  BYTE  MAX  LENGTH 

SSTG:       DB  3H  ; LENGTH  OF  SUBSTRING 

DB  'AAB  •'   ;32  BYTE  MAX  LENGTH 


END 


Copy  a  Sybstf log  from  a  String  (COPY 


8D 


Copies  a  substring  from  a  string,  given  a 
starting  index  and  the  number  of  bytes  to  copy. 
The  strings  are  a  maximum  of  255  bytes  long, 
and  the  actual  characters  are  preceded  by  a  byte 
containing  the  length.  If  the  starting  index  of  the 
substring  is  0  (that  is,  the  substring  would  start 
in  the  length  byte)  or  is  beyond  the  end  of  the 
string,  the  substring  is  given  a  length  of  0  and 
the  Carry  flag  is  set  to  1.  If  the  substring  would 
exceed  its  maximum  length  or  would  extend 
beyond  the  end  of  the  string,  then  only  the 
maximum  number  or  the  available  number  of 
characters  (up  to  the  end  of  the  string)  is  placed 
in  the  substring,  and  the  Carry  flag  is  set  to  1 .  If 
the  substring  can  be  formed  as  specified,  the 
Carry  flag  is  cleared. 


Procedure:  The  program  exits  immediately  if 
the  number  of  bytes  to  copy,  the  maximum 
length  of  the  substring,  or  the  starting  index  is  0. 
It  also  exits  immediately  if  the  starting  index 
exceeds  the  length  of  the  string.  If  none  of  these 
conditions  holds,  the  program  checks  if  the 
number  of  bytes  to  copy  exceeds  either  the 
maximum  length  of  the  substring  or  the  number 
of  characters  available  in  the  string.  If  either  is 
exceeded,  the  program  reduces  the  number  of 
bytes  to  copy  appropriately.  It  then  copies  the 
proper  number  of  bytes  from  the  string  to  the 
substring.  The  program  clears  the  Carry  flag  if 
the  substring  can  be  formed  as  specified  and  sets 
the  Carry  flag  if  it  cannot. 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  Approximately  21  *  NUM  BER  OF 
BYTES  COPIED  plus  2.37  cycles  overhead.  NUM  BER 
OF  BYTES  COPIED  is  the  number  specified  if  no 
problems  occur,  or  the  number  available,  or  the  maxi- 
mum length  of  the  substring  if  copying  would  extend 
beyond  either  the  string  or  the  substring.  If,  for 
example,  NUMBER  OF  BYTES  COPIED  =  12|o 
(OC15),  the  execution  time  is 

21  *  12  +  237  =  252  +  237  =  489  cycles 

Program  Size:  73  bytes 

Data  Memory  Required:  Two  bytes  anywhere  in 
RAM  for  the  maximum  length  of  the  substring 
(address  MAXLEN)  and  an  error  flag  (address 
CPYERR) 

Special  Cases: 

1 .  If  the  number  of  bytes  to  copy  is  0,  the  program 
assigns  the  substring  a  length  of  0  and  clears  the  Carry 
flag,  indicating  no  errors. 


2.  If  the  maximum  length  of  the  substring  is  0,  the 
program  assigns  the  substring  a  length  of  0  and  sets 
the  Carry  flag  to  1 ,  indicating  an  error. 

3.  If  the  starting  index  of  the  substring  is  0,  the 
program  assigns  the  substring  a  length  of  0  and  sets 
the  Carry  flag  to  1 ,  indicating  an  error. 

4.  If  the  source  string  does  not  even  reach  the  speci- 
fied starting  index,  the  program  assigns  the  substring 
a  length  of  0  and  sets  the  Carry  flag  to  1 ,  indicating  an 
error. 

.5.  If  the  substring  would  extend  beyond  the  end  of 
the  source  string,  the  program  places  all  the  available 
characters  in  the  substring  and  sets  the  Carry  flag  to 
1,  indicating  an  error.  The  available  characters  are 
the  ones  from  the  starting  index  to  the  end  of  the 
string. 

6.  If  the  substring  would  exceed  its  specified  maxi- 
mum length,  the  program  places  only  the  specified 
maximum  number  of  characters  in  the  substring.  It 
sets  the  Carry  flag  to  1,  indicating  an  error. 


Entry  Conditions 

Base  address  of  substring  in  DE 
Base  address  of  string  in  HL 
Number  of  bytes  to  copy  in  B 


Starting  index  to  copy  from  in  C 
Maximum  length  of  substring  in  A 
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Exit  Conditions 

Substring  contains  characters  copied  from  string. 
If  the  starting  index  is  0,  the  maximum  length  of 
the  substring  is  0,  or  the  starting  index  is  beyond 
the  length  of  the  string,  the  substring  will  have  a 
length  of  0  and  the  Carry  flag  will  be  set  to  1 .  If 


the  substring  would  extend  beyond  the  end  of 
the  string  or  would  exceed  its  specified  maximum 
length,  only  the  available  characters  from  the 
string  (up  to  the  maximum  length  of  the  substring) 
are  copied  into  the  substring;  the  Carry  flag  is  set 
in  this  case  also.  If  no  problems  occur  in  forming 
the  substring,  the  Carry  flag  is  cleared. 


Examples 


Data:     String  =  lO'LET  Yl  =  R7  +  X4' 

(!0|5  =  16|Q  is  the  length  of  the  string) 
Maximum  length  of  substring  =  2 
Number  of  bytes  to  eopy  =  2 
Starting  index  =  5 

Result:     Substring  =  02'Yr  (2  is  the  length  of  the 
substring) 

Two  bytes  from  the  string  were  copied, 
starting  at  character  #5  (that  is,  characters 
5  and  6) 

Carry  =  0,  since  no  problems  occurred  in 
forming  the  substring . 

Data:     String  =  OE'8657  POWELL  ST' 

(OEij  =  14|Q  is  the  length  of  the  string) 
Maximum  length  of  substring  =  10|5=  16|() 
Number  of  bytes  to  copy  =  0D|5  = 
Starting  index  =  6 

Result:     Substring  =  09'POWELL  ST'  (09  is  the 
length  of  the  substring) 
Carry  =  1,  since  there  were  not  enough 
characters  available  in  the  string  to  provide 
the  specified  number  of  bytes  to  copy. 


Data: 


Result: 


String=  16'9414  HEGENBERGER  DRIVE" 

(16,5  ~  22|g  is  the  length  of  the  string) 
Maximum  length  of  substring  =  10|g=  Ib^g 
Number  of  bytes  to  copy  =  1 1 15  =  17|q 
Starting  index  =  6 

Substring  =  lO'HEGENBERGER  DRIV 
(10|5  =  '6|Q  is  the  length  of  the  substring) 

Carry  =  1 ,  since  the  number  of  bytes  to  copy 
exceeded  the  maximum  length  of  the  sub- 
string. 


Title 
Name : 


Copy  a  substring  from  a  string 
Copy 
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Purposes  Copy  a  substring  from  a  string  given  a  starting 

index  and  the  number  of  bytes 

Entry:  Register  pair  HL  =  Address  of  source  string 

Register  pair  DE  =  Address  of  destination  string 
Register  A  =  Maximum  length  of  destination 
string 

Register  B  =  Number  of  bytes  to  copy 

Register  C  =  Starting  index  into  source  string 

Index  of  1  is  first  character  of 

str  ing 

A  string  is  a  maximum  of  255  bytes  long  plus 
a  length  byte  which  precedes  it. 

Exit:  Destination  string  s =  The  substring  from  the 

string. 

if  no  errors  then 

CARRY  :=  0 
else 

begin 

the  following  conditions  cause  an 
error  and  the  CARRY  flag  =  1. 
if  (index  =  0)  or  (maxlen  =  0>  or 
(index  >  length ( source ) )  then 

the  destination  string  will  have  a  zero 

length. 

if   (index  +  count  -  1.)  >  length  ( source  > 
then 

the  destination  string  becomes  everything  ; 
from  index  to  the  end  of  source  string. 
END;  i 

Registers  used:  AF,BC,DE,HL  \ 


Time;  Approximately  (21  «  count)  cycles  plus  237 

cycles  overhead. 

Size:  Program  73  bytes 

Data  2  bytes 


COPY: 

jSAVE  MAXIMUM  LENGTH  OF  DESTINATION  STRING 
LD  CMAXLEN),A  ; SAVE  MAXIMUM  LENGTH 

;  INITIALIZE  LENGTH  OF  DESTINATION  STRING  AND  ERROR  FLAG 
SUB  A 

LD  (DE),A  ; LENGTH  OF  DESTINATION  STRING  =  ZERO 

LD  (CPYERR),A  ; ASSUME  NO  ERRORS 

;IF  NUMBER  OF  BYTES  TO  COPY  IS  0,  EXIT  WITH  NO  ERRORS 
OR  B  fTEST  NUMBER  OF  BYTES  TO  COPY 
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RET 


sEXIT  WITH  NO  ERRORS 
;  CARRY  =  0 


;IF  MAXIMUM  LENGTH  IS  0,   TAKE  ERROR  EXIT 

LD  A,  (MAXLEN.)  ; TEST  MAXIMUM  LENGTH 

OR  A 

JR  Z,EREXIT  J  ERROR  EXIT  IF  MAX  LENGTH  IS  0 

;IF  STARTING  INDEX  IS  ZERO,   TAKE  ERROR  EXIT 

LD  A,C  J  TEST  STARTING  INDEX 

OR  A 

JR  Z,EREXIT  ? ERROR  EXIT  IF  INDEX  IS  0 

!lF  STARTING  INDEX  IS  GREATER  THAN  LENGTH  OF  SOURCE 
;   STRING,   TAKE  ERROR  EXIT 

LD  A, CHL)  (GET  LENGTH  OF  SOURCE  STRING 

CP  C  f COMPARE  TO  STARTING  INDEX 

RET  C  (ERROR  EXIT  IF  LENGTH  LESS  THAN  INDEX 

;   CARRY  =  1 


RECALCs 


CHECK  IF  COPY  AREA  FITS  IN  SOURCE  STRING 
OTHERWISE,   COPY  ONLY  TO  END  OF  STRING 
COPY  AREA  FITS  IF  STARTING  INDEX  +  NUMBER  OF 
CHARACTERS  TO  COPY  -  1   IS  LESS  THAN  OR  EQUAL  TO 
LENGTH  OF  SOURCE  STRING 
NOTE  THAT  STRINGS  ARE  NEVER  MORE  THAN  255  BYTES  LONG 
LD  A,C  jFORM  STARTING  INDEX  +  COPY  LENGTH 

ADD  A,B 

JR  CRECALC  sJUMP  IF  SUM  >  255 

DEC  A 
CP  (HL) 

JR  CCNTIOK  fJUMP  IF  MORE  THAN  ENOUGH  TO  COPY 

JR  Z,CNT10K  jJUMP  IF  EXACTLY  ENOUGH 

f CALLER  ASKED  FOR  TOO  MANY  CHARACTERS.   RETURN  EVERYTHING 
;   BETWEEN  INDEX  AND  END  OF  SOURCE  STRING. 
J   SET  COUNT  :=  LENGTH (SOURCE)  -  INDEX  +  1; 


LD 

LD 

LD 

SUB 

INC 

LD 


A,OFFH 
(CPYERR.l,A 

A,  (HL) 
C 

A 

B,  A 


{INDICATE  TRUNCATION  OF  COUNT 
! COUNT  =  LENGTH  -  INDEX  +  1 

; CHANGE  NUMBER  OF  BYTES 


CNTIOK: 


CHECK  IF  COUNT  LESS  THAN  OR  EQUAL  TO  MAXIMUM  LENGTH  OF 
DESTINATION  STRING.    IF  NOT,   SET  COUNT  TO  MAXIMUM  LENGTH 
IF  COUNT  >  MAXLEN  THEN 
COUNT  !=  MAXLEN 


LD 
CP 
JR 
LD 
LD 


A,  (MAXLEN) 
B 

NC,CNT20K 

B,  A 
A,OFFH 


!lS  MAX  LENGTH  LARGE  ENOUGH? 

jJUMP  IF  IT  IS 

jELSE  LIMIT  COPY  TO  MAXLEN 

;  INDICATE  STRING  OVERFLOW 
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LD  (CPYERRJ,A 

J  MOVE  SUBSTRING  TO  DESTINATION  STRING 

CNT20K: 

LD  A,B  jTEST  NUMBER  OF  BYTES  TO  COPY 

OR  A 

JR  Z,EREXIT  ; ERROR  EXIT  IF  NO  BYTES  TO  COPY 

LD  B,0  ; START  COPYING  AT  STARTING  INDEX 

ADD  HL,BC 

LD  (DE),A  fSET  LENGTH  OF  DESTINATION  STRING 

LD  C,A  ; RESTORE  NUMBER  OF  BYTES 

INC  DE  ;MOVE  DESTINATION  ADDRESS  PAST 

;   LENGTH  BYTE 

LDIR  jCOPY  SUBSTRING 

! CHECK  FOR  COPY  ERROR 

LD  A, (CPYERR)  ; TEST  FOR  ERRORS 

OKEXIT: 

OR  A 
RET  Z 

; ERROR  EXIT 

EREXITj 

SCF 
RET 

J  DATA  SECTION 
MAXLENs   DS  1 
CPYERRs   DS  1 


; RETURN  WITH  C  =  0  IF  NO  ERRORS 

sSET  CARRY  TO  INDICATE  AN  ERROR 

5  MAX  I MUM  LENGTH  OF  DESTINATION  STRING 
;COPY  ERROR  FLAG 


J 

!  SAMPLE  EXECUTION; 


SC8D; 


LD 
LD 
LD 
LD 
LD 
LD 
LD 

CALL 


JR 


HL,SSTG 
DE.DSTG 
A, (IDX) 
C  A 

A, '  (CNT) 

B,  A 

A, (MXLEN) 
COPY 


SC8D 


IDX: 
CNT! 


(DATA  SECTION 
DB  4 
OB  3 


J  SOURCE  STRING 

; DESTINATION  STRING 

! STARTING  INDEX  FOR  COPYING 

; NUMBER  OF  BYTES  TO  COPY 

J  MAXIMUM  LENGTH  OF  SUBSTRING 

SCOPY  SUBSTRING 

J  COPYING  3  CHARACTERS  STARTING  AT 

5    INDEX  4  FROM  ' 12. 345E+10'  GIVES  '345' 

jLOOP  FOR  MORE  TESTING 


! STARTING  INDEX  FOR  COPYING 
{NUMBER  OF  CHARACTERS  TO  COPY 
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MXLEN:     DB  20H  ; MAXIMUM  LENGTH  OF  DESTINATION  STRING 

SSTG:       DB  OAH  ; LENGTH  OF  STRING 

DB  '12.345E+10  ?  32  BYTE  MAX  LENGTH 

nSTGs       DB  0  ; LENGTH  OF  SUBSTRING 

DB  ■'   ;32  BYTE  MAX  LENGTH 


END 


Del#t@  o  Sybstrlng  from  o  String  (DELETE)  8E 


Deletes  a  substring  from  a  string,  given  a  start- 
ing index  and  a  length.  The  string  is  a  maximum 
of  255  bytes  long,  and  the  actual  characters  are 
preceded  by  a  byte  containing  the  length.  The 
Carry  flag  is  cleared  if  the  deletion  can  be  per- 
formed as  specified.  The  Carry  flag  is  set  if  the 
starting  index  is  0  or  beyond  the  length  of  the 
string;  the  string  is  left  unchanged  in  either  case. 
If  the  deletion  extends  beyond  the  end  of  the 
string,  the  Carry  flag  is  set  to  1  and  only  the 
characters  from  the  starting  index  to  the  end  of 
the  string  are  deleted. 

Procedure:  The  program  exits  immediately  if 
either  the  starting  index  or  the  number  of  bytes 


Registers  Used;  AF,  BC,  DE,  HL 

Execution  Time:  Approximately  21  *  NUM  BER  OF 
BYTES  MOVED  DOWN+ 224cycles,  where  NUM- 
BER OF  BYTES  MOVED  DOWN  is  zero  il  the  string 
can  be  truncated  and  is  STRING  LENGTH  - 
SIARTING  INDEX  -  NUMBER  OF  BYT  ES  TO 
DELETE  +  1  if  the  string  must  be  compacted.  That 
is,  it  takes  extra  time  when  the  deletion  creates  a 
"hole"  in  the  string  that  must  be  filled  by  compaction. 

Examples 

1.  STRING  LENGTH  =  20,^  (.32|o) 
STARTING  INDEX  =  19,(,  (2.5|o) 
NUMBER  OF  BYTES  TO  DELETE  =  08 

Since  there  are  exactly  eight  bytes  left  in  the  string 
starting  at  index  19|(,,  all  the  routine  must  do  is  trun- 
cate (that  is,  cut  off  the  end  of  the  string).  This  takes 
21  *  0  +  224  =  224  cycles 

2.  STRING  LENGTH  =  40,6  (64io) 
STARTING  INDEX  =  \<)^^  (25|o) 
NUMBER  OF  BYTES  TO  DELETE  =  08 


Entry  Conditions 

Base  address  of  string  in  HL 
Number  of  bytes  to  delete  in  B 
Starting  index  to  delete  from  in  C 


to  delete  is  0.  It  also  exits  if  the  starting  index  is 
beyond  the  length  of  the  string.  If  none  of  these 
conditions  holds,  the  program  checks  to  see  if  the 
string  extends  beyond  the  area  to  be  deleted.  If  it 
does  not,  the  program  simply  truncates  the  string 
by  setting  the  new  length  to  the  starting  index 
minus  1.  If  it  does,  the  program  compacts  the 
resulting  string  by  moving  the  bytes  above  the 
deleted  area  down.  The  program  then  determines 
the  new  string's  length  and  exits  with  the  Carry 
cleared  if  the  specified  number  of  bytes  were 
deleted  or  with  the  Carry  set  to  1  if  any  errors 
occurred. 


Since  there  are  20,^  (.?2[q)  bytes  above  the  truncated 
area,  the  routine  must  move  them  down  eight  posi- 
tions to  fill  the  "hole." Thus  NUMBER  OF  BYTES 
MOVED  DOWN  =  .32,0  and  the  execution  time  is 

21  *  32  +  224  =  672  +  224  =  896  cycles 
Program  Size:  .58  bytes 

Data  Memory  Required:  One  byte  anywhere  in 
RAM  for  an  error  flag  (address  DELERR) 

Special  Cases: 

1.  If  the  number  of  byte.s  to  delete  is  0,  the 
program  exits  with  the  Carry  flag  cleared  (no  errors) 
and  the  string  unchanged. 

2.  If  the  string  does  not  even  extend  to  the  specified 
starting  index,  the  program  exits  with  the  Carry  flag 
setto  1  (indicating  an  error)and  the  string  unchanged. 

.3.  If  the  number  of  bytes  to  delete  exceeds  the 
number  available,  the  program  deletes  all  bytes  from 
the  starting  index  to  the  end  of  the  string  and  exits 
with  the  Carry  flag  set  to  1  (indicating  an  error). 


Exit  Conditions 

Substring  deleted  from  string.  If  no  errors  occur, 
the  Carry  flag  is  cleared.  If  the  starting  index  is  0 
or  beyond  the  length  of  the  string,  the  Carry  flag 
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is  set  and  the  string  is  unchanged.  If  the  number 
of  bytes  to  delete  would  go  beyond  the  end  of  the 
string,  the  Carry  flag  is  set  and  the  characters 
from  the  starting  index  to  the  end  of  the  string 
are  deleted. 


Examples 

1.     Data:     String  =  26'SALES  FOR  MARCH  AND 
APRIL  OF  THIS  YEAR' 
(26,5  =  38,0  is  the  length  of  the  string) 
Number  of  bytes  to  delete  =  OA|j  =  10|q 
Starting  index  to  delete  from  =  10,^  =  16]q 

Result:  String=  IC  'SALES  FOR  MARCH  OFTHIS 
YEAR'  (1C,(;  =  28,0  is  the  length  of  the 
string  with  ten  bytes  deleted  starting  with 
the  16th  character— the  deleted  material  is 
'AND  APRIL  ') 
Carry  =  0,  since  no  problems  occurred  in  the 
deletion. 


2.     Data:     String  =  28'THE  PRICE  IS  $3.00  (S2.00 
BEFORE  JUNE  I)'  (28,f,  =  40,o  is  the 
length  of  the  string) 
Number  of  bytes  to  delete  =  30|6  =  48,0 
Starting  index  to  delete  from  =  13|6  =  19io 

Resuh:  String  =  12'THE  PRICE  IS  S3.00'  (12,(,  = 
18 10  is  the  length  of  the  string  with  all 
remaining  bytes  deleted) 
Carry  =  1 ,  since  there  were  not  as  many  bytes 
left  in  the  string  as  were  supposed  to  be 
deleted. 


Title: 
Name: 


Delete  a  substring  from  a  string 
Delete 


Purpose: 


Entry: 


Delete  a  substring  from  a  string  given  a 
starting  index  and  a  length 

Register  pair  HL  =  Base  address  of  string 
Register  B  =  Number  of  bytes  to  delete 
Register  C  =  Starting  index  into  the  string. 

An  index  of  1  is  the  first  character 


Exit: 


A  string  is  a  maximum  of  255  bytes  long  plus 
a  length  byte  which  precedes  it. 

Substring  deleted, 
if  no  errors  then 

CARRY  :=  0 
else 
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begin 

the  following  conditions  cause  an 
error  with  CARRY  =  1. 

if   (index  =  0)  or  (index  >  length ( string) ) 

then  do  not  change  string 
if  count  is  too  large  then 

delete  only  the  characters  from 

index  to  end  of  string 

end; 

Registers  used:  AF,BC,DE,HL 

Time:  Approximately  21  k  (LENGTH(STRG) -lNDEX-COUNT+1 ) 

plus  224  cycles  overhead 

Sizes  Program  58  bytes 

Data  1  bytes 


DELETE: 


!  INITIALIZE  ERROR  INDICATOR  (DELERR.)  TO  0 

SUB 

A 

LD 

(DELERR) , A 

J  ASSUME  NO  ERF?ORS 

?  CHECK 

IF  COUNT  AND 

INDEX  ARE  BOTH  NON-ZERO 

OR 

B 

;TEST  NUMBER  OF  BYTES  TO  DELETE 

RET 

Z 

; RETURN  WITH  CARRY  =  0  (NO  ERRORS)  IF 

;   0  BYTES  TO  DELETE 

LD 

A,C 

jTEST  STARTING  INDEX 

OR 

A 

SCF 

; CARRY  =  1 

RET 

Z 

jERROR  EXIT  (CARRY  =  1)  IF 

;   STARTING  INDEX  =  0 

J  CHECK 

IF  STARTING 

INDEX  WITHIN  STRING 

;  ERROR 

EXIT  IF  NOT 

LD 

A, (HL) 

fGET  LENGTH 

CP 

C 

;IS  INDEX  WITHIN  STRING? 

RET 

C 

jNO,   TAKE  ERROR  EXIT 

;BE  SURE  ENOUGH  CHARACTERS  ARE  AVAILABLE 

;    IF  NOT,   DELETE  ONLY  TO  END  OF  STRING 

;    IF  INDEX  +  NUMBER 

OF  CHARACTERS  -  1  >  LENGTH (STRING)  THEN 

;       NUMBER  OF  CHARACTERS  s=  LENGTH  (STRING.)  -  INDEX  +  1 

LD 

A,C 

;GET  INDEX 

ADD 

A,B 

J  ADD  NUMBER  OF  CHARACTERS  TO  DELETE 

JR 

CTRUNC 

; TRUNCATE  IF  SUM  >  255 

LD 

E,A 

;SAVE  SUM  AS  STARTING  INDEX  FOR  MOVE 

DEC 

A 

CP 

(HL) 

; COMPARE  TO  LENGTH 

JR 

CCNTOK 

jJUMP  IF  ENOUGH  CHARACTERS  AVAILABLE 

JR 

Z , TRUNC 

J  TRUNCATE  BUT  NO  ERRORS  (EXACTLY  ENOUGH 

"   CHARACTERS  ^ 

LD 

A,OFFH 

Vindicate  error  -  not  enough  characters 

LD 

(DELERR), A 

;   AVAILABLE  FOR  DELETION 
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TRUNC: 


CNTOK: 


; TRUNCATE  STRING  -  NO  COMPACTING  NECESSARY 
t  STRING  LENGTH  =  INDEX  -  1 


LD 

DEC 

LD 

LD 

RRA 

RET 


A,C 
A 

(HL), A 

A,  CDELERR) 


; STRING  LENGTH  =  INDEX 


SCARRY  =  0  IF  NO  ERRORS 
jEXIT 


; DELETE  SUBSTRING  BY  COMPACTING 

5  MOVE  ALL  CHARACTERS  ABOVE  DELETED  AREA  DOWN 

J  NEW  LENGTH  =  OLD  LENGTH  -  NUMBER  OF  BYTES  TO  DELETE 


LD 
LD 
SUB 
LD 


A, (HL) 
D,  A 
B 

(HL), A 


J  SAVE  OLD  LENGTH 
jSET  NEW  LENGTH 


OKEXIT: 


J  CALCULATE  NUMBER  OF  CHARACTERS  TO  MOVE 

J  NUMBER  =  STRING  LENGTH  -  (INDEX  +  NUMBER  OF  BYTES)  +  1 


LD 

SUB 

INC 


A,D 

E 

A 


<i5ET  OLD  LENGTH 
SUBTRACT  INDEX  +  NUMBER  OF  BYTES 
A  =  NUMBER  OF  CHARACTERS  TO  MOVE 


! CALCULATE  SOURCE  AND  DESTINATION  ADDRESSES  FOR  MOVE 
5  SOURCE  =  BASE  +  INDEX  +  NUMBER  OF  BYTES  TO  DELETE 
{DESTINATION  =  BASE  +  INDEX 


PUSH 

LD 

ADD 

EX 

LD 

ADD 

POP 

LD 


HL 

B,  0 
HL,BC 
(SP) ,HL 
D,0 
HL,DE 
DE 

C,  A 


LDIR 

?GOOD  EXIT 

OR  A 
RET 


;SAVE  STRING  ADDRESS 

; DESTINATION  =  BASE  +  INDEX 

! SOURCE  =  BASE  +  INDEX  +  NUMBER 
!     OF  BYTES  TO  DELETE 
fHL  =  SOURCE  (ABOVE  DELETED  AREA) 
;DE  =  DESTINATION 

;BC  =  NUMBER  OF  CHARACTERS  TO  MOVE 
; COMPACT  STRING  BY  MOVING  DOWN 


; CLEAR  CARRY,   NO  ERRORS 


DELERR: 


jDATA 
DS 


; DELETE  ERROR  FLAG 


SAMPLE  EXECUTION; 


SC8E; 

LD 


HL.SSTG  jHL  =  EASE  ADDRESS  OF  STRING 
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LD  A, (IDX) 

LD  C,A  jC  =  STARTING  INDEX  FOR  DELETION 

LD  A, CCNT) 

LD  B,A  jB  =  NUMBER  OF  CHARACTERS  TO  DELETE 

CALL        DELETE     5  DELETE  CHARACTERS 

; DELETING  4  CHARACTERS  STARTING  AT  INDEX 
5  FROM  "JOE  HANDOVER"  LEAVES  "HANDOVER" 

JR  SC8E         ;LOOP  FOR  ANOTHER  TEST 


;DATA 

SECTION 

IDX: 

DB 

1 

CNT: 

DB 

4 

SSTG: 

DB 

12 

DB 

'JOE  HANDOVER 

J  STARTING  INDEX  FOR  DELETION 
; NUMBER  OF  CHARACTERS  TO  DELETE 
f LENGTH  OF  STRING 


END 


insert  a  Substring  Into  a  String  (INSERT)  8F 


Inserts  a  substring  into  a  string,  given  a  start- 
ing index.  The  string  and  substring  are  both  a 
maximum  of  255  bytes  long,  and  the  actual 
characters  are  preceded  by  a  byte  containing  the 
length.  The  Carry  flag  is  cleared  if  the  insertion 
can  be  accomplished  with  no  problems.  The 
Carry  flag  is  set  if  the  starting  index  is  0  or  beyond 
the  length  of  the  string.  In  the  second  case,  the 
substring  is  concatenated  to  the  end  of  the  string. 
The  Carry  flag  is  also  set  if  the  string  with  the 
insertion  will  exceed  a  specified  maximum  length. 
In  that  case,  the  program  inserts  only  enough  of 
the  substring  to  give  the  string  its  maximum 
length. 

Procedure:  The  program  exits  immediately  if 
the  starting  index  or  the  length  of  the  substring 
is  0.  If  neither  is  0,  the  program  checks  to  see  if 
the  insertion  will  produce  a  string  longer  than 


the  specified  maximum  length.  If  this  is  the  case, 
the  program  truncates  the  substring.  The  program 
then  checks  to  see  if  the  starting  index  is  within 
the  string.  If  it  is  not,  the  program  simply  con- 
catenates the  substring  by  moving  it  to  the 
memory  locations  immediately  after  the  end  of 
the  string.  If  the  starting  index  is  within  the 
string,  the  program  must  first  make  room  for 
the  insertion  by  moving  the  remaining  characters 
up  in  memory.  This  move  must  start  at  the  high- 
est address  to  avoid  writing  over  any  data.  Final- 
ly, the  program  can  move  the  substring  into  the 
open  area.  The  program  then  determines  the  new 
string  length  and  exits  with  the  Carry  flag  set 
appropriately  (to  0  if  no  problems  occurred  and 
to  I  if  the  starting  index  was  0,  if  the  substring 
had  to  be  truncated,  or  if  the  starting  index  was 
beyond  the  length  of  the  string). 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  Approximately  2!  *  NUMBER 
OF  BYTES  MOVED+  21  *  NUMBER  OF  BYTES 
INSERTED+  290.  NUMBER  OF  BYTES  MOVED 
is  the  number  of  bytes  that  must  be  moved  to 
create  space  for  the  insertion.  If  the  starting  index  is 
beyond  the  end  of  the  string,  NUMBER  OF  BYTES 
MOVED  is  0  since  the  substring  is  simply  concatenated 
to  the  string.  Otherwise,  it  is  STRING  LENGTH  - 
STARTING  INDEX  +  I ,  since  the  bytes  at  or  above 
the  starting  index  must  be  moved.  NUMBER  OF 
BYTES  INSERTED  is  the  length  of  the  substring  if 
no  truncation  occurs.  It  is  the  maximum  length  of  the 
string  minus  its  current  length  if  inserting  the  substring 
produces  a  string  longer  than  the  maximum. 

Examples 

1.  STRING  LENGTH  =  20,6  O'^io) 
STARTING  INDEX  =  19,6  (25|o) 
MAXIMUM  LENGTH  =  30,(,  (48,o) 
SUBSTRING  LENGTH  =  06 

We  want  to  insert  a  substring  six  bytes  long,  start- 
ing at  the  25th  character.  Since  eight  bytes  must  be 


moved  up  (NUMBER  OF  BYTES  MOVED  =32- 
25  +  1)  and  six  bytes  must  be  inserted,  the  execution 
time  is  approximately 

21*8+21*6+290=  168+  126+ 290=  584  cycles 

2.  STRING  LENGTH  =  20,6  (32io) 
STARTING  INDEX  =  19,6  (25,o) 
MAXIMUM  LENGTH  =  24|j  (36,o) 
SUBSTRING  LENGTH  =  06 
Unlike  Example  1,  here  we  can  insert  only  four 
bytes  of  the  substring  without  exceeding  the  maximum 
length  of  the  string.  Thus,  NUMBER  OF  BYTES 
MOVED=  8  and  NUMBER  OF  BYTES  INSERTED 
=  4.  The  execution  time  is  approximately 

2 1  *  8  +  2 1  *  4  +  290  =  168  +  84  +  290  =  542  cycles 
Program  Size:  90  bytes 

Data  IVIemory  Required:  One  byte  anywhere  in 
RAM  for  an  error  flag  (address  INSERR). 

Special  Cases: 

1 .  If  the  length  of  the  substring  (the  insertion)  is  0, 
the  program  exits  with  the  Carry  flag  cleared  (no 
errors)  and  the  string  unchanged. 
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2.  If  the  starting  index  for  the  insertion  is  0  (that 
is,  the  insertion  would  start  in  the  length  byte),  the 
program  exits  with  the  Carry  flag  set  to  1  (indicating 
an  error)  and  the  string  unchanged. 

3.  If  the  string  with  the  substring  inserted  exceeds 
the  specified  maximum  length,  the  program  inserts 
only  enough  characters  to  reach  the  maximum  length. 
The  Carry  flag  is  set  to  1  to  indicate  that  the  insertion 
has  been  truncated. 


4.  If  the  starting  index  of  the  insertion  is  beyond 
the  end  of  the  string,  the  program  concatenates  the 
insertion  at  the  end  of  the  string  and  indicates  an 
error  by  setting  the  Carry  flag  to  1 . 

5.  If  the  original  length  of  the  string  exceeds  its 
specified  maximum  length,  the  program  exits  with 
the  Carry  flag  set  to  1  (indicating  an  error)  and  the 
string  unchanged. 


Entry  Conditions 


Exit  Conditions 


Base  address  of  substring  in  DE 
Base  address  of  string  in  HL 
Maximum  length  of  string  in  B 
Starting  index  at  which  to  insert  the 
substring  in  C 


Substring  inserted  into  string.  If  no  errors  occur, 
the  Carry  flag  is  cleared.  If  the  starting  index  or 
the  length  of  the  substring  is  0,  the  Carry  flag  is 
set  and  the  string  is  not  changed.  If  the  starting 
index  is  beyond  the  length  of  the  string,  the  Carry 
flag  is  set  and  the  substring  is  concatenated  to  the 
end  of  the  string.  If  the  string  with  the  substring 
inserted  would  exceed  the  specified  maximum 
length,  the  Carry  flag  is  set  and  only  those  char- 
acters from  the  substring  which  bring  the  string 
to  maximum  length  are  inserted. 


Examples 

1.     Data:     String  =  OA'JOHN  SMITH' (OA|f,  =  10,o  is 
the  length  of  the  string) 
Substring  =  08'W1LL1AM'  (08  is  the  length 

of  the  substring) 
Maximum  length  of  string  =  14^,  =  20, q 
Starting  index  =  06 

Result:     String  =  12'JOHN  WILLIAM  SMITH' 
( 1 2 ,  J  =  1 8 1 Q  is  the  length  of  the  string 
with  the  substring  inserted) 
Carry  =  0,  since  no  problems  occurred  in  the 
insertion. 


2.     Data:      String  =  OA'JOHN  SMITH'  (OA,,,  =  10,„  is 
the  length  of  the  string) 
Substring  =  OCROCKEFELLER'  (OC.^  = 

12|Q  is  the  length  of  the  substring) 
Maximum  length  of  string  =  14,5  =  20|q 
Starting  index  =  06 

Result:  String=  14'JOHN  ROCKEFELLESMITH' 
(14|5=  20|Q  is  the  length  of  the  string  with 
as  much  of  the  substring  inserted  as  the 
maximum  length  would  allow) 
Carry  =  1,  since  some  of  the  substring  could 
not  be  inserted  without  exceeding  the  maxi- 
mum length  of  the  string. 
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Title  : 
Name: 


Insert  a  substring  into  a  string 
Insert 


Purpose! 
Entry; 


Exit: 


Insert  a  substring  into  a  string  given  a 
starting  index 


Register  pair  HL 
Register  pair  DE 


Address  of  string 
Address  of  substring  to 
insert 

Register  B  =  Maximum  length  of  string 
Register  C  =  Starting  index  to  insert  the 
substr  ing 

A  string  is  a  maximum  of  255  bytes  long  plus 
a  length  byte  which  precedes  it. 

Substring  inserted  into  string, 
if  no  errors  then 

CARRY  =  0 
e  1  se 

begin 

the  following  conditions  cause  the 
CARRY  flag  to  be  set. 
if  index  =  0  then 

do  not  insert  the  substring 
if  lengthCstrg)  >  maximum  length  then 

do  not   insert  the  substring 
if  index  >  length<strg)  then 

concatenate  substg  onto  the  end  of  the 

source  string 
if  length(strg)+length(substr ing)  >  maxlen 

then  insert  only  enough  of  the  substring 

to  reach  maximum  length 

end; 


Registers  used:  AF,BC,DE,HL 


Time: 


Sizes 


Approximately 
21  «   (LENGTH(STRG)  -  INDEX  +  1)  + 
21  «  ( LENGTH C SUBSTG).)  + 
290  cycles  overhead 

Program  90  bytes 
Data  1  byte 


INSERT: 

; INITIALIZE  ERROR  FLAG 
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IDXO: 


SUB 


; ERROR  FLAG  =  0  (NO  ERRORS.) 


(INSERR),A 


!GET  SUBSTRING  AND  STRING  LENGTHS 
;    IF  LENGTH (SUBSTG)  =  0  THEN  EXIT  BUT  NO  ERROR 
LD  A,(DE)  jTEST  LENGTH  OF  SUBSTRING 

OR  A 

RET  Z  J  EX IT  IF  SUBSTRING  EMPTY 

;   CARRY  =  0  (NO  ERRORS) 

;IF  STARTING  INDEX  IS  ZERO,   TAKE  ERROR  EXIT 

;TEST  STARTING  INDEX 


LD 
OR 
SCF 

RET  Z 


A,C 
A 


; ASSUME  AN  ERROR 

J  RETURN  WITH  ERROR  IF  INDEX 


CHKLEN: 


CHECK  WHETHER  INSERTION  WILL  MAKE  STRING  TOO  LONG 

IF  IT  WILL,   TRUNCATE  SUBSTRING  AND  SET 

TRUNCATION  FLAG. 
INSERTION  TOO  LONG  IF  STRING  LENGTH  +  SUBSTRING  LENGTH 

EXCEEDS  MAXIMUM  LENGTH.     REMEMBER,   STRINGS  CANNOT  BE 

MORE  THAN  255  BYTES  LONG 


J  TOTAL  =  STRING  +  SUBSTRING 


LD 

A,  (DE.) 

ADD 

A, (HL) 

JR 

CTRUNC 

CP 

B 

LD 

A, (DE) 

JR 

C, IDXLEN 

JR 

Z, IDXLEN 

! TRUNCATE  SUBSTRING  IF  NEW  LENGTH  >  255 

! COMPARE  TO  MAXIMUM  LENGTH  OF  STRING 

!A  =  LENGTH  OF  SUBSTRING 

f JUMP  IF  TOTAL  <  MAX  LENGTH 

!   OR  EQUAL 


J  SUBSTRING  DOES  NOT  FIT,  SO  TRUNCATE  IT 
t  SET  ERROR  FLAG  TO  INDICATE  TRUNCATION 
J   LENGTH  THAT  FITS  =  MAXIMUM  LENGTH  -  STRING  LENGTH 

TRUNC: 


LD 

A,OFFH 

? INDICATE  SUBSTRING  TRUNCATED 

LD 

(INSERR),A 

LD 

A,B 

? LENGTH  =  MAX  -  STRING  LENGTH 

SUB 

(HL) 

RET 

C 

! RETURN  WITH  ERROR  IF  STRING  TOO 

SCF 

;   LONG  INITIALLY  OR  ALREADY  MAX 

RET 

Z 

;  LENGTH  SO  NO  ROOM  FOR  SUBSTRING 

IDXLEN: 


! CHECK  IF  INDEX  WITHIN  STRING.    IF  NOT,  CONCATENATE 
;   SUBSTRING  ONTO  END  OF  STRING 

UD  B,A  sB  =  LENGTH  OF  SUBSTRING 

LD  A,(HL)  ; GET  STRING  LENGTH 

CP  C  J  COMPARE  TO  INDEX 

JR  NCLENOK  sJUMP  IF  STARTING  INDEX  WITHIN  STRING 

; INDEX  NOT  WITHIN  STRING,   SO  CONCATENATE 
J   NEW  LENGTH  OF  STRING  =  OLD  LENGTH  +  SUBSTRING  LENGTH 
LD  C,A  J  SAVE  CURRENT  STRING  LENGTH 

ADD  A,B  ;ADD  LENGTH  OF  SUBSTRING 
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LD 


<HL) , A 


!SET  NEW  LENGTH  OF  STRING 


J  SET  ADDRESSES  FOR  CONCATENATION 

J  DE  =  STRING  ADDRESS  +  LENGTH (STRING)  +  1 


IDXLl: 


LENOK: 


f  HL 

EX 

LD 

INC 

ADD 

LD 

JR 

INC 

LD 
LD 
JR 


=  SUBSTRING  ADDRESS 
DE,HL 
A,C 
A 

A,E 
E,  A 

NC, IDXLl 
D 


!HL  =  SUBSTRING  ADDRESS 
IDE  =  END  OF  STRING 


A,OFFH 
(INSERR), A 
MVESUB 


J  INDICATE  INSERTION  ERROR 
jJUST  MOVE,   NOTHING  TO  OPEN  UP 


;OPEN  UP  SPACE  IN  SOURCE  STRING  FOR  SUBSTRING  BY  MOVING 
;  CHARACTERS  FROM  END  OF  SOURCE  STRING  DOWN  TO  INDEX,  UP  BY 
;   SIZE  OF  SUBSTRING. 
i   A  =  LENGTH (STRING) 


PUSH 
PUSH 


BC 
DE 


;SAVE  LENGTH  OF  SUBSTRING 
SSAVE  ADDRESS  OF  SUBSTRING 


J  NEW  LENGTH  OF  STRING  =  OLD  LENGTH  +  SUBSTRING  LENGTH 
LD  E,A  ;DE  =  STRING  LENGTH 

LD  D,0 
ADD  A,  B 

LD  (HL),A  ;STORE  NEW  LENGTH  OF  STRING 

; CALCULATE  NUMBER  OF  CHARACTERS  TO  MOVE 
f  =  STRING  LENGTH  -  STARTING  INDEX  +  1 

LD  A,E  sGET  ORIGINAL  LENGTH  OF  STRING 

SUB  C 

INC  A  ;A  =  NUMBER  OF  CHARACTERS  TO  MOVE 

; CALCULATE  ADDRESS  OF  LAST  CHARACTER  IN  STRING.   THIS  IS 

J  SOURCE  ADDRESS  =  STRING  ADDRESS  +  LENGTH (STRING) 

ADD  HL,DE  fHL  POINTS  TO  LAST  CHARACTER  IN  STRING 

LD  E,L  fDE  ALSO 

LD  D,H 

CALCULATE  DESTINATION  ADDRESS 

=  STRING  ADDRESS  +  LENGTH (STRING)  +  LENGTH  OF  SUBSTRING 
THIS  MOVE  f^UST  START  AT  HIGHEST  ADDRESS  AND  WORK  DOWN 


!  TO 

AVOID  OVERWRITING 

PART 

OF  THE  STRING 

LD 

C,B 

;BC 

=  LENGTH  OF  SUBSTRING 

LD 

B,0 

ADD 

HL,BC 

EX 

DE.HL 

;HL 

=  SOURCE  ADDRESS 

SDE 

=  DESTINATION  ADDRESS 

LD 

C,  A 

;BC 

=  NUMBER  OF  CHARACTERS 
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LDDR 


J  OPEN  UP  FOR  SUBSTRING 


MVESUBs 


! RESTORE  REGISTERS 
EX  DE,HL 
INC  DE 
POP  HL 
POP  EC 


jDE  =  ADDRESS  TO  MOVE  STRING  TO 
;HL  =  ADDRESS  OF  SUBSTRING 
;B  =  LENGTH  OF  SUBSTRING 


MOVE  SUBSTRING  INTO  OPEN  AREA 
HL  =  ADDRESS  OF  SUBSTRING 
DE  =  ADDRESS  TO  MOVE  SUBSTRING 
C  =  LENGTH  OF  SUBSTRING 


TO 


INC 

LD 

LD 

LDIR 


HL 
C,B 

B,0 


; INCREMENT  PAST  LENGTH  BYTE  OF  SUBSTRING 
fBC  =  LENGTH  OF  SUBSTRING  TO  MOVE 

fMOVE  SUBSTRING  INTO  OPEN  AREA 


LD 
RRA 

RET 


A, (INSERR)  sGET  ERROR  FLAG 

;IF  INSERR  <>  0  THEN  CARRY  =  1 
t   TO  INDICATE  AN  ERROR 


INSERR! 


;DATA  SECTION 
DS  1 


jFLAG  USED  TO  INDICATE  ERROR 


SAMPLE  EXECUTION! 


SCSF: 


LD  HL,STG     ;HL  =  BASE  ADDRESS  OF  STRING 

LD  DE,SSTG  ;DE  =  BASE  ADDRESS  OF  SUBSTRING 

LD  A, (IDX) 

LD  C,A  iC  =  STARTING  INDEX  FOR  INSERTION 

LD  A, (MXLEN) 

LD  B,A  ;B  =  MAXIMUM  LENGTH  OF  STRING 

CALL         INSERT     ; INSERT  SUBSTRING 

J  RESULT  OF  INSERTING  INTO  '123456  '  AT 

;    INDEX  1   IS  '-123456' 


JR 


SCSF 


SLOOP  FOR  ANOTHER  TEST 


IDX! 

MXLEN: 

STG: 

SSTGi 


sDATA 

DB 

DB 

DB 

DB 

DB 

DB 


SECTION 
1 

20H 
06H 

■'123456 
1 


; STARTING  INDEX  FOR  INSERTION 
; MAXIMUM  LENGTH  OF  DESTINATION 
{LENGTH  OF  STRING 

'   ;32  BYTE  MAX  LENGTH 
; LENGTH  OF  SUBSTRING 

•'  J  32  BYTE  MAX  LENGTH 


END 


8-Bit  Array  Summation  (ASUM8 


9A 


Adds  the  elements  of  an  array,  producing  a 
16-bit  sum.  The  array  consists  of  up  to  255  byte- 
length  elements. 

Procedure:  The  program  clears  the  sum  initial- 
ly. It  then  adds  elements  one  at  a  time  to  the  less 
significant  byte  of  the  sum,  starting  at  the  base 
address.  Whenever  an  addition  produces  a  carry, 
the  program  increments  the  more  significant 
byte  of  the  sum. 


Registers  Used:  AF,  B,  DE,  HL 

Execution  Time:  Approximately  38  cycles  per  byte- 
length  element  plus  49  cycles  overhead 

Program  Size:  19  bytes 

Data  IMemory  Required:  None 

Speciai  Case:  An  array  size  of  0  causes  an  imme- 
diate exit  with  the  sum  equal  to  0. 


Entry  Conditions 


Exit  Conditions 


Base  address  of  array  in  HL 
Size  of  array  in  bytes  in  B 


Sum  in  HL 


Example 


Data:     Array  consists  of 


F7|6 
23,6 

31 16 
70„ 


5A„ 

16,6 

CB„ 

El,6 


Result:     Sum  =  (HL)  =  03D7p 


Title 
Name: 


8-bit  array  summation 
ASUM8 


Purposes 


Sum  the  elements  of  an  array,  yielding  a  16-bit 
result.  Maximum  size  is  255 
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Entry; 


Register  pair  HL  =  Ease  address  of  array 
Register  B  =  Size  of  array  in  bytes 


Exit:  Register  pair  HL  =  Sum 

Registers  useds  AF,B,DE,HL 


Time: 


Sise: 


Approximately  38  cycles  per  element  plus 
49  cycles  overhead 

Program  19  bytes 


ASUM3: 


;TEST  ARRAY  LENGTH 

J  EXIT  WITH  SUM  =  0  IF  NOTHING  IN  ARRAY 

EX  DE,HL  ;SAVE  BASE  ADDRESS  OF  ARRAY 

LD  HL,0  J  INITIALIZE  SUM  TO  0 


; CHECK  FOR  LENGTH  OF  ZERO 


LD 
OR 
RET 


A,B 

A 

2 


STEST  ARRAY  LENGTH 

jEXIT  WITH  SUM  =  0  IF  LENGTH  =  0 


INITIALIZE  ARRAY  POINTER,  SUM 

EX  DE.HL  J  RESTORE  BASE  ADDRESS  OF  ARRAY 

?  HIGH  BYTE  OF  SUM  =  0 

SUB  A  fA  =  LOW  BYTE  OF  SUM  =  O 

;D  =  HIGH  BYTE  OF  SUM 

5  ADD  BYTE-LENGTH  ELEMENTS  TO  SUM  ONE  AT  A  TIME 

f INCREMENT  HIGH  BYTE  OF  SUM  WHENEVER  A  CARRY  OCCURS 


SUMLP: 


DECCNT: 


EXIT: 


ADD 

JR 

INC 

INC 
DJNZ 

LD 
LD 
RET 


A, (HL) 
NC, DECCNT 
D 

HL 

SUMLP 

L,A 
H,D 


J  ADD  NEXT  BYTE 
jJUMP  IF  NO  CARRY 

;   ELSE  INCREMENT  HIGH  BYTE  OF  SUM 


!HL 


SUM 


SAMPLE  EXECUTION 


SC9A! 

LD  HL,BUF  ;HL  =  BASE  ADDRESS  OF  BUFFER 

LD  ArlBUFSZ) 
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LD 
CALL 


ASUM3 


;E  =  SIZE  OF  BUFFER  IN  BYTES 

;SUM  OF  TEST  DATA  IS  07F8  HEX, 
}   HL  =  07F8H 


JR 


SC9A 


fTEST  DATA,   CHANGE  FOR  OTHER  VALUES 
SIZE 
BUFSZ 


BUF: 


EQU 

j_<ir> 

DB 

OOH 

OB 

UH 

DB 

22H 

DB 

33H 

DB 

44H 

DB 

55H 

DB 

66H 

DB 

77H 

DB 

88H 

DB 

99H 

DB 

OAAH 

DB 

OBBH 

DB 

OCCH 

DB 

ODDH 

DB 

OEEH 

DB 

OFFH 

fSIZE  OF  BUFFER  IN  BYTES 
SSIZE  OF  BUFFER  IN  BYTES 


5  BUFFER 

; DECIMAL  ELEMENTS  ARE  0,17,34,51,63 
!  85,102,119,135,153,170,187,204 
J  221,238,255 


;SUM  =  07F8  (2040  DECIMAL) 


END 


16-Bit  Array  Summation  (ASUM16) 


9B 


Adds  the  elements  of  an  array,  producing  a 
24-bit  sum.  The  array  consists  of  up  to  255  word- 
length  (16-bit)  elements.  The  elements  are  ar- 
ranged in  the  usual  Z80  format  with  the  less 
significant  bytes  first. 

Procedure:  The  program  clears  the  sum  initial- 
ly. It  then  adds  elements  to  the  less  significant 
bytes  of  the  sum  one  at  a  time,  starting  at  the 
base  address.  Whenever  an  addition  produces  a 
carry,  the  program  increments  the  most  signifi- 
cant byte  of  the  sum. 


Registers  Used:  AF,  BC,  DE,  HL 

ExecuHon  Time:  Approximately  68  cycles  per  16- 
bit  element  plus  49  cycles  overhead 

Program  Size:  25  bytes 

Data  Memory  Required:  None 

Special  Case:  An  array  size  of  0  causes  an  imme- 
diate exit  with  the  sum  equal  to  0. 


Entry  Conditions 


Exit  Conditions 


Base  address  of  array  in  HL 
Size  of  array  in  16-bit  words  in  B 


Most  significant  byte  of  sum  in  E 

Middle  and  least  significant  bytes  of  sum  in  HL 


Example 

1.     Data;       Array  (in  16-bit  words)  consists  of 


F7A1|6 

5A36,6 

2.39B|6 

166C,6 

CBF5,6 

70F2„ 

E107,6 

Result:  Sum=03DBAl,6 
(E)=03,6 
(HL)=  DBA1|6 


Title  16-bit  array  summation 

Name:  ASUM16 
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ASUM16: 


SUMLP: 


DECCNT: 


EXIT: 


Purpose:  Sum  the  elements  of  an  array,  yielding  a  24-bit 

result.  Maximum  size  is  255  16-bit  elements 

Entry!  Register  pair  HL  =  Base  address  of  array 

Register  B  =  Size  of  array  in  words 

Exits  Register  A  =  High  byte  of  sum 

Register  H  =  Middle  byte  of  sum 
Register  L  =  Low  byte  of  sum 

Registers  used:  AF,BC,DE,HL 

Time:  Approximately  68  cycles  per  element  plus 

49  cycles  overhead 

Size:  Program  25  bytes 


?TEST  ARRAY  LENGTH 

jEXIT  WITH  SUM  =  0  IF  NOTHING  IN  ARRAY 

EX  DE,HL  fSAVE  EASE  ADDRESS  OF  ARRAY 

LD  HL,0  ; INITIALIZE  SUM  TO  0 

? CHECK  FOR  ARRAY  LENGTH  OF  ZERO 

LD  A,B  fTEST  ARRAY  LENGTH 

OR  A 

RET  Z  jEXIT  WITH  SUM  =  0  IF  LENGTH  =  0 

? INITIALIZE  ARRAY  POINTER,  SUM 

EX  DE,HL  jBASE  ADDRESS  BACK  TO  HL 

;   LOW,   MIDDLE  BYTES  OF  SUM  =  0 

LD  C,E  !C  =  HIGH  BYTE  OF  SUM  =  0 

!D  =  MIDDLE  BYTE  OF  SUM 
;E  =  LOW  BYTE  OF  SUM 

;ADD  WORD-LENGTH  ELEMENTS  TO  SUM  ONE  AT  A  TIME 
INCREMENT  HIGH  BYTE  OF  SUM  WHENEVER  A  CARRY  OCCURS 

LD  A,E  ;ADD  LOW  BYTES  OF  ELEMENT  AND  SUM 

ADD  A, (HL) 

LD  E,A 

INC  HL  sADD  HIGH  BYTE  OF  ELEMENT  TO 

LD  A,D  !   MIDDLE  BYTE  OF  SUM 

ADC  A, (HL) 

LD  D,  A 

JR  NC, DECCNT  ; JUMP  IF  NO  CARRY 

INC  C  ;   ELSE  INCREMENT  HIGH  BYTE  OF  SUM 


INC  HL 
DJNZ  SUMLP 

EX  DE.HL  ;HL  =  MIDDLE  AND  LOW  BYTES  OF  SUM 
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LD 
FET 


A,C. 


HIGH  BYTE  OF  SUM 


SAMPLE  EXECUTION 


SC9B: 


LD 
LD 
LD 
CALL 


JR 


{TEST  DATA, 
SIZE 
BUFSZ: 


BUF: 


HL,BUF 

A,  (BUFSZ) 

B,  A 

ASUM16 


SC9B 


jHL  =  BASE  ADDRESS  OF  BUFFER 

;B  =  SIZE  OF  BUFFER  IN  WORDS 

;SUM  OF  TEST  DATA  IS  31FF8  HEX, 
;  REGISTER  PAIR  HL  =  1FF8H 
f  REGISTER  A  =  3 


CHANGE  FOR  OTHER  VALUES 

jSIZE  OF  BUFFER  IN  WORDS 
jSIZE  OF  BUFFER  IN  WORDS 


EQU 

01  OH 

DB 

SIZE 

DW 

OOOH 

DM 

lllH 

DW 

222H 

DW 

333H 

DW 

444H 

DW 

555H 

DW 

&6&H 

DW 

777H 

DW 

38SH 

DW 

999H 

DW 

OAAAH 

DW 

OBBBH 

DW 

OCCCH 

DW 

ODDDDH 

DW 

OEEEEH 

DW 

OFFFFH 

; BUFFER 

; DECIMAL  ELEMENTS  ARE  0,273,546,819,1092 
f    1365, 1638, 1911,2184,2457,2730,3003,3276 
;  56797,61166,65535 


jSUM  =  31FF8  (204792  DECIMAL) 


END 


Find  Maximum  Byte-Length 
Element  (MAXELM) 


9C 


Finds  the  maximum  element  in  an  array.  The 
array  consists  of  up  to  255  unsigned  byte-length 
elements. 

Procedure:  The  program  exits  immediately 
(setting  Carry  to  1)  if  the  array  has  no  elements. 
Otherwise,  the  program  assumes  that  the  ele- 
ment at  the  base  address  is  the  maximum.  It  then 
proceeds  through  the  array,  comparing  the  sup- 
posed maximum  with  each  element  and  retaining 
the  larger  value  and  its  address.  Finally,  the 
program  clears  Carry  to  indicate  a  valid  result. 


Registers  Used:  AF,  B,  DE,  HL 

Execution  Time:  Approximately  36  to  58  cycles  per 
element  plus  35  cycles  overhead.  If,  on  the  average, 
the  program  must  replace  the  maximum  in  half  of 
the  iterations,  the  execution  time  is  approximately 
94  *  ARRAY  SIZE/2  +  35  cycles. 
Program  Size:  19  bytes 
Data  Memory  Required:  None 
Special  Cases: 

1.  An  array  size  of  0  causes  an  immediate  exit 
with  the  Carry  flag  set  to  1  to  indicate  an  invalid 
result. 

2.  If  the  largest  unsigned  value  occurs  more  than 
once,  the  program  returns  with  the  lowest  possible 
address.  That  is,  it  returns  with  the  address  closest  to 
the  base  address  that  contains  the  maximum  value. 


Entry  Conditions  Exit  Conditions 

Base  address  of  array  in  HL  Largest  unsigned  element  in  A 

Size  of  array  in  bytes  in  B  Address  of  largest  unsigned  element  in  HL 

Carry  =  0  if  result  is  valid;  1  if  size  of  array  is  0 
and  resuh  is  meaningless. 


Example 

1.     Data:     Array  (in  bytes)  consists  of 


35,6 

44,6 

A6|6 

59,6 

D2|6 

7A,6 

1B,6 

CF,6 

Result:     The  largest  unsigned  element  is  element  #2 

(D2„) 

(A)  =  largest  element  {Dl^f) 
(HL)  =  BASE  +  2  (lowest  address  contain- 
ing D2|5) 

Carry  flag  =  0,  indicating  that  array  size  is 
non-zero  and  the  result  is  valid. 
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Find  maximum  byte-length  element 

MAXELM 


Given  the  base  address  and  size  of  an  array, 
find  the  largest  element 

Register  pair  HL  =  Base  address  of  array 
Register  B  =  Size  of  array  in  bytes 

If  size  of  array  not  zero  then 
Carry  flag  =  O 
Register  A  =  Largest  element 
Register  pair  HL  =  Address  of  that  element 
if  there  are  duplicate  values  of  the  largest 
element,  register  pair  HL  has  the  address 
nearest  to  the  base  address 
else 

Carry  flag  =  1 

Registers  useds  AF,B,DE,HL 

Time;  Approximately  36  to  58  cycles  per  element 

plus  35  cycles  overhead 

Sizes  Program  19  bytes 


MAXELMs 

fEXIT  WITH  CARRY  SET  IF  NO  ELEMENTS  IN  ARRAY 

LD  A,B  ;TEST  ARRAY  SIZE 

OR  A 

SCF  -SET  CARRY  TO  INDICATE  ERROR  EXIT 

RET  Z  p RETURN  IF  NO  ELEMENTS 

S REPLACE  PREVIOUS  GUESS  AT  LARGEST  ELEMENT  WITH 
;   CURRENT  ELEMENT.     FIRST  TIME  THROUGH,   TAKE  FIRST 
;   ELEMENT  AS  GUESS  AT  LARGEST 
MAXLPs     LD  A, (HL)  ; LARGEST  =  CURRENT  ELEMENT 

LD  E,L  ;SAVE  ADDRESS  OF  LARGEST 

LD  D,H 

! COMPARE  CURRENT  ELEMENT  TO  LARGEST 

JKEEP  LOOKING  UNLESS  CURRENT  ELEMENT  IS  LARGER 

MAXLPl! 

DEC  B 

JR  Z,EXIT 

INC  HL 


Title 
Name : 

Purpose: 
Entry: 
Exit ! 


9C  FIND  MAXIMUM  BYTE-LEN,GTH  ELEMENT  (MAXELM)  327 


CP  (HL)  J  COMPARE  CURRENT  ELEMENT,  LARGEST 

JR  NCMAXLPl  ; CONTINUE  UNLESS  CURRENT  ELEMENT  LARGER 

JR  MAXLP  ;ELSE  CHANGE  LARGEST 

OR  A  J  CLEAR  CARRY  TO  INDICATE  NO  ERRORS 

EX  DE,HL  ;HL  =  ADDRESS  OF  LARGEST  ELEMENT 
RET 


SAMPLE  EXECUTION! 


LD  HL,ARY  ;HL  =  BASE  ADDRESS  OF  ARRAY 

LD  B,SZARY  fB  =  SIZE  OF  ARRAY  IN  BYTES 

CALL  MAXELM 

? RESULT  FOR  TEST  DATA  IS 

;   A  =  FF  HEX   (MAXIMUM),   HL  =  ADDRESS  OF 

;   FF  IN  ARY 

JR  SC9C  jLOOP  FOR  MORE  TESTING 

EQU  lOH  ; SIZE  OF  ARRAY  IN  BYTES 

DB  3 

DB  7 

DB  6 

DB  5 

DB  4 

DB  3 

DB  2 

DB  1 

DB  OFFH 

DB  OFEH 

DB  OFDH 

DB  OFCH 

DB  OFBH 

DB  OFAH 

DB  0F9H 

DB  0F8H 


Find  Minimum  Byte-L@ngth 
Element  (MINELM) 


9D 


Finds  the  minimum  element  in  an  array.  The 
array  consists  of  up  to  255  unsigned  byte-length 
elements. 

Procedure:  The  program  exits  immediately 
(setting  Carry  to  1)  if  the  array  has  no  elements. 
Otherwise,  the  program  assumes  that  the  ele- 
ment at  the  base  address  is  the  minimum.  It  then 
proceeds  through  the  array,  comparing  the  sup- 
posed minimum  to  each  element  and  retaining 
the  smaller  value  and  its  address.  Finally,  the 
program  clears  Carry  to  indicate  a  valid  result. 


Registers  Used:  AF,  B,  DE,  HL 

Execution  Time:  Approximately  "id  to  65  cycles  per 
element  plus  3.5  cycles  overhead.  If,  on  the  average, 
the  program  must  replace  the  minimum  in  half  of 
the  iterations,  the  execution  time  is  approximately 
101  *  ARRAY  SIZE/2  +.-?5  cycles. 

Program  Size:  21  bytes 

Data  (Memory  Required:  None 

Speciai  Cases: 

1.  An  array  size  of  0  causes  an  immediate  exit 
with  the  Carry  flag  set  to  1  to  indicate  an  invalid 
result. 

2.  If  the  smallest  unsigned  value  occurs  more 
than  once,  the  program  returns  with  the  lowest  pos- 
sible address.  That  is,  it  returns  with  the  address 
closest  to  the  base  address  that  contains  the  min- 
imum value. 


Entry  Conditions  Exit  Conditions 

Base  address  of  array  in  HL  Smallest  unsigned  element  in  A 

Size  of  array  in  bytes  in  B  Address  of  smallest  unsigned  element  in  HL 

Carry  =  0  if  result  is  valid;  1  if  size  of  array  is  0 
and  result  is  meaningless. 


ixcinipl© 

1.     Data:     Array  (in  bytes)  consists  of 


■35,6 

44,6 

A6,6 

59,6 

7A,6 

1B,6 

CF,6 

Result:     The  smallest  unsigned  element  is  element  #.3 
(1B,6) 

(A)=  smallest  element  (lB|j) 
(HL)  =  BASE  +  3  (lowest  address  contain- 
ing 1B,6) 

Carry  flag  =  0,  indicating  that  array  size  is 
non-zero  and  the  result  is  valid. 
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Title 
Name: 


Find  minimum  byte-length  element 
MINELM 


MINELM: 


Purpose: 

Entry: 

Exit: 


Registers  used: 
Times 

Size: 


Given  the  base  address  and  size  of  an  array, 
find  the  smallest  element 

Register  pair  HL  =  Base  address  of  array 
Register  E  =  Size  of  array  in  bytes 

If  size  of  array  not  zero  then 
Carry  flag  =  O 

Register  A  =  Smallest  element 

Register  pair  HL  =  Address  of  that  element 

if  there  are  duplicate  values  of   the  smallest 

element,  HL  will  have  the  address 

nearest  to  the  base  address 
e  1  se 

Carry  flag  =  1 

AF,B,DE,HL 

Approximately  36  to  65  cycles  per  element 
plus  35  cycles  overhead 

Program  21  bytes 


MlNLPs 


MINLPl: 


J  EXIT  WITH  CARRY  SET  IF  NO  ELEMENTS  IN  ARRAY 
LD  A,B  ;TEST  ARRAY  SIZE 

OR  A 

SCF  jSET  CARRY  TO  INDICATE  AN  ERROR  EXIT 

RET  Z  I  RETURN  IF  NO  ELEMENTS 

; REPLACE  PREVIOUS  GUESS  AT  SMALLEST  ELEMENT  WITH 
J  CURRENT  ELEMENT.     FIRST  TIME  THROUGH,   TAKE  FIRST 
!  ELEMENT  AS  GUESS  AT  SMALLEST 

LD  A, (HL)  {SMALLEST  =  CURRENT  ELEMENT 

LD  E,L  ;SAVE  ADDRESS  OF  SMALLEST 

LD  D,H 

5  COMPARE  CURRENT  ELEMENT  TO  SMALLEST 

SKEEP  LOOKING  UNLESS  CURRENT  ELEMENT  IS  SMALLER 


DEC 
JR 


B 

Z,EXIT 
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EXIT: 


INC 

HL 

CP 

(HL) 

? COMPARE  CURRENT  ELEMENT,  SMALLEST 

JR 

CMINLPl 

; CONTINUE  IF  CURRENT  ELEMENT  LARGER 

JR 

Z,MINLP1 

;  OR  SAME 

JR 

MINLP 

jELSE  CHANGE  SMALLEST 

OR 

A 

; CLEAR  CARRY  TO  INDICATE  NO  ERRORS 

EX 

DE,HL 

;HL  =  ADDRESS  OF  SMALLEST  ELEMENT 

RET 

SAMPLE  EXECUTION! 


SC9D: 


SZARY 
ARY: 


LD 
LD 
CALL 


HL, ARY 
B,  SZARY 
MINELM 


JR 

SC9D 

EQU 

iOH 

DB 

8 

DB 

7 

DB 

6 

DB 

5 

DB 

4 

DB 

3 

DB 

DB 

1 

DB 

OFFH 

DB 

OFEH 

DB 

OFDH 

DB 

OFCH 

DB 

OFBH 

DB 

OFAH 

DB 

0F9H 

DB 

0F8H 

END 

;HL  =  BASE  ADDRESS  OF  ARRAY 
;B  =  SIZE  OF  ARRAY  IN  BYTES 

f RESULT  FOR  TEST  DATA  IS 

5  A  =  1  HEX   (MINIMUM),   HL  =  ADDRESS  OF 

;    1   IN  ARY 

;LOOP  FOR  MORE  TESTING 
;SIZE  OF  ARRAY  IN  BYTES 


Binary  Search  (BINSCH) 


9E 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  Approximately  114  cycles  per 
iteration  plus  53  cycles  overhead.  A  binary  search 
requires  on  the  order  of  log2N  iterations,  where  N  is 
the  number  of  elements  in  the  array. 

Program  Size:  37  bytes 

Data  Memory  Required:  None 

Special  Case:  A  size  of  0  causes  an  immediate  exit 
with  the  Carry  flag  set  to  1.  That  is,  the  array  con- 
tains no  elements  and  the  value  surely  cannot  be 
found. 


Searches  an  array  of  unsigned  byte-length 
elements  for  a  particular  value.  The  elements  are 
assumed  to  be  arranged  in  increasing  order. 
Clears  Carry  if  it  finds  the  value  and  sets  Carry 
to  1  if  it  does  not.  Returns  the  address  of  the 
value  if  found.  The  size  of  the  array  is  specified 
and  is  a  maximum  of  255  bytes. 

Procedure:  The  program  performs  a  binary 
search,  repeatedly  comparing  the  value  with  the 
middle  remaining  element.  After  each  compari- 
son, the  program  discards  the  part  of  the  array 
that  cannot  contain  the  value  (because  of  the 
ordering).  The  program  retains  upper  and  lower 
bounds  for  the  remaining  part.  If  the  value  is 
larger  than  the  middle  element,  the  program 
discards  the  middle  and  everything  below  it.  The 
new  lower  bound  is  the  address  of  the  middle 
element  plus  1 .  If  the  value  is  smaller  than  the 
middle  element,  the  program  discards  the  mid- 
dle and  everything  above  it.  The  new  upper 
bound  is  the  address  of  the  middle  element 
minus  1 .  The  program  exits  if  it  finds  a  match  or 
if  there  is  nothing  left  to  search. 

For  example,  assume  that  the  array  is 
01,6,  02,,,  05|„07,e,  09,,,  09,,,  0D,„  10,,, 
2E,„  37,6,  5D,e,  7E,6,A1,„  64,,,  D7,„  EO,, 

and  the  value  to  be  found  is  ODig.  The  proce- 
dure works  as  follows. 

In  the  first  iteration,  the  lower  bound  is  the 
base  address  and  the  upper  bound  is  the  address 
of  the  last  element.  So  the  result  is 

LOWER  BOUND  =  BASE 

UPPER  BOUND=  BASE+  SIZE^  1  =  BASE+OF,, 

GUESS  =  (UPPER  BOUND  +  LOWER  BOUND)/2 

(the  result  is  truncated)  =  BASE  +  7 
(GUESS)  =  ARRAY(7)=  10,,=  16,(, 

Since  the  value  (ODig)  is  less  than  ARR  AY(7), 
the  elements  beyond  #6  can  be  discarded.  So  the 
result  is 


LOWER  BOUND  =  BASE 

UPPER  BOUND  =  GUESS  -  1  =  BASE+  6 

GUESS  =  (UPPER  BOUND  +  LOWER  BOUND)/2 

=  BASE  +  3 
(GUESS)  =  ARRAY(3)=  07 

Since  the  value  (OD  i^)  is  greater  than  ARRAY(3), 
the  elements  below  #4  can  be  discarded.  So  the 
result  is 

LOWER  BOUND  =  GUESS  +  I  =  BASE  +  4 
UPPER  BOUND  =  BASE  +  6 

GUESS  =  (UPPER  BOUND  +  LOWER  BOUND)/2 

=  BASE  +  5 
(GUESS)  =  ARRAY(5)  =  09 

Since  the  value(0Di6)  is  greaterthan  ARRAY(5), 
the  elements  below  #6  can  be  discarded.  So  the 
result  is 

LOWER  BOUND  =  GUESS  +  1  =  BASE  +  6 
UPPER  BOUND  =  BASE+  6 

GUESS  =  (UPPER  BOUND  +  LOWER  BOUND)/2 
=  06 

(GUESS)  =  ARRAY(6)  ==  OD,, 

Since  the  value  (OD  ig)  is  equal  to  ARRAY(6), 
the  element  has  been  found.  If,  on  the  other 
hand,  the  value  were  OEig,  the  new  lower  bound 
would  be  BASE  +  7  and  there  would  be  nothing 
left  to  search. 
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Entry  Conditions 


Exit  Conditions 


Value  to  find  in  A  Carry  =  0  if  the  value  is  found;  1  if  it  is  not 

Size  of  the  array  in  bytes  in  C  found. 

Base  address  of  array  (address  of  smallest    If  the  value  is  found,  (HL)  =  its  address, 
unsigned  element)  in  HL 


Examples 


Length  of  array  =  IO|j  2.  Data: 

Elements  of  array  are  01     02,6,  05,  j,  07,6, 09, 6,09, ,,,00,  j, 

10,6,  2E|6,  37,6,  5D,6,  7E|6,  A 1 ,6,  B4,6,  D7,6,  EO,^  Result: 


Value  to  find=  98,, 


Carry  =  1,  indicating  value  not  found 


1.     Data:        Value  to  find  =  0D,6 

Result:        Carry  =  0,  indicating  value  found 

(HL)  =  BASE  +  6  (address  containing  0D,6) 


Title 
Name: 


Binary  search 
BINSCH 


Purpose! 
Entry: 

Exit: 


Search  an  ordered  array  of  unsigned  bytes 
with  a  maximum  size  of  255  elements 

Register  pair  HL  =  Base  address  of  array 
Register  C  =  Size  of  array 
Register  A  =  Byte  to  find 

If  the  value  is  found  then 
Carry  flag  =  O 

Register  pair  HL  =  Address  of  value 
ELSE 

Carry  flag  =  1 


Registers  used:  AF,BC,DE,HL 
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Time; 


Approximately  114  cycles  for  each  iteration  of 
the  search  loop  plus  53  cycles  overhead 

A  binary  search  takes  on  the  order  of  log 
base  2  of  N  searches,  where  N  is  the  number  of 
elements  in  the  array. 


Size; 


Program  37  bytes 


BINSCH; 


5  EX  IT  WITH  CARRY  SET  IF  NO  ELEMENTS  IN  ARRAY 


INC 
DEC 
SCF 
RET 


C 
C 


5  TEST  ARRAY  SIZE 

jSET  CARRY  IN  CASE  SIZE  IS  0 

J  RETURN  INDICATING  VALUE  NOT  FOUND 

!    IF  SIZE  IS  0 


INITIALIZE  LOWER  BOUND,   UPPER  BOUND  OF  SEARCH  AREA 
LOWER  BOUND  (DE)  =  BASE  ADDRESS 
UPPER  BOUND  <HL>  =  ADDRESS  OF  LAST  ELEMENT 
=  BASE  ADDRESS  +  SIZE  -  1 

LD  E,L  SLOWER  BOUND  =  BASE  ADDRESS 

LD  D,H 

LD  B,0  J  EXTEND  SIZE  TO  16  BITS 

ADD  HL,EC  SUPPER  BOUND  =  BASE  +  SIZE  -  1 

DEC  HL 


LOOP; 


SSAVE  VALUE  BEING  SOUGHT 


LD 


C,A 


II  SAVE  VALUE 


ITERATION  OF  BINARY  SEARCH 

1)  COMPARE  VALUE  TO  MIDDLE  ELEMENT 

2)  IF  THEY  ARE  NOT  EQUAL,   DISCARD  HALF  THAT 

CANNOT  POSSIBLY  CONTAIN  VALUE  (BECAUSE  OF  ORDERING) 

3)  CONTINUE  IF  THERE  IS  ANYTHING  LEFT  TO  SEARCH 


;HL  =  UPPER  BOUND 
!DE  =  LOWER  BOUND 
jC  =  VALUE  TO  FIND 
5 FIND  MIDDLE  ELEMENT 
; MIDDLE  =  (UPPER  BOUND 


PUSH 

ADD 

RR 

RR 

LD 


HL 

HL,DE 

H 

L 

A, (HL) 


+  LOWER  BOUND)   /  2 
jSAVE  UPPER  BOUND  ON  STACK 
SADD  UPPER  BOUND  AND  LOWER  BOUND 
J  DIVIDE  17-BIT  SUM  BY  2 

;GET  MIDDLE  ELEMENT 


; COMPARE  MIDDLE  ELEMENT  AND  VALUE 

CP  C  ; COMPARE  MIDDLE  ELEMENT  AND  VALUE 

JR  NCTOOLRG  sJUMP  IF  VALUE  SAME  OR  LARGER 


! MIDDLE  ELEMENT  LESS  THAN  VALUE 
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;  SO  CHANGE  LOWER  BOUND  TO  MIDDLE  +  1 
5   SINCE  EVERYTHING  BELOW  MIDDLE  IS  EVEN  SMALLER 
EX  DE,HL  SLOWER  BOUND  =  MIDDLE  +  1 

INC  DE 

POP  HL  J  RESTORE  UPPER  BOUND 

JR  CONT 

! MIDDLE  ELEMENT  GREATER  THAN  OR  EQUAL  TO  VALUE 
?  SO  CHANGE  UPPER  BOUND  TO  MIDDLE  -  1 
J  SINCE  EVERYTHING  ABOVE  MIDDLE  IS  EVEN  LARGER 
J  EX  IT  WITH  CARRY  CLEAR  IF  VALUE  FOUND 

TOOLRGs 

INC  SP  ! DISCARD  OLD  UPPER  BOUND  FROM  STACK 

INC  SP 

RET  Z  J  IF  MIDDLE  ELEMENT  SAME  AS  VALUE 

;   RETURN  WITH  CARRY  CLEAR 
J   AND  HL  =  ADDRESS  CONTAINING  VALUE 

DEC  HL  ; UPPER  BOUND  =  MIDDLE  -  1 

; CONTINUE  IF  THERE  IS  ANYTHING  LEFT  TO  BE  SEARCHED 
S NOTHING  LEFT  WHEN  LOWER  BOUND  ABOVE  UPPER  BOUND 

CONT: 

LD  A,L  jFORM  UPPER  BOUND  -  LOWER  BOUND 

CP  E  !  MUST  SAVE  BOTH,   SO  USE  8-BIT  SUBTRACT 

LD  A,H 

SBC  A,D 

JR  NCLOOP  ; CONTINUE  IF  ANYTHING  LEFT  TO  SEARCH 

J  NOTHING  LEFT  TO  SEARCH  SO  COULD  NOT  FIND  VALUE 

5 RETURN  WITH  CARRY  SET  (MUST  BE  OR  JR  NC  WOULD  HAVE  BRANCHED) 

RET 


SAMPLE  EXECUTION 


SC9E! 

; SEARCH  FOR  A  VALUE  THAT  IS  IN  THE  ARRAY 

LD  HL,BF  »HL  -  BASE  ADDRESS  OF  ARRAY 

LD  A,(BFSZ.) 

LD  C,A  fC  =  ARRAY  SIZE  IN  BYTES 

LD  A, 7  jA  =  VALUE  TO  FIND 

CALL        BINSCH  ; SEARCH 

J  CARRY  FLAG  =  0  (VALUE  FOUND) 

SHL  =  BF  +  4  (ADDRESS  OF  7  IN  ARRAY) 


; SEARCH  FOR  A  VALUE  THAT  IS  NOT  IN  THE  ARRAY 

LD  HL,BF  {HL  -  BASE  ADDRESS  OF  ARRAY 

LD  A,(BFSZ) 

LD  C,A  sC  =  ARRAY  SIZE  IN  BYTES 

LD  A,0  ;A  =  VALUE  TO  FIND 

CALL        BINSCH  ; SEARCH 

SCARRY  FLAG  =  1    (VALUE  NOT  FOUND) 
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JR 

SC9E 

jDATA 

SIZE 

EQU 

OlOH 

BFSZs 

DB 

SIZE 

BFs 

DB 

1 

DB 

2 

DB 

4 

DB 

5 

DB 

7 

DB 

9 

DB 

10 

DB 

1 1 

DB 

23 

DB 

50 

DB 

81 

DB 

123 

DB 

191 

DB 

199 

DB 

250 

DB 

255 

END 

J  LOOP  FOR  MORE  TESTS 


J  SIZE  OF  ARRAY  IN  BYTES 
jSIZE  OF  ARRAY  IN  BYTES 
! BUFFER 


ayicksort  (QSORT) 


9F 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  Approximately  N  *  logjN  loops 
through  PARTLP  plus  2  *  N  +  1  overhead  calls 
to  SORT.  Each  iteration  of  PARTLP  takes  approx- 
imately 200  cycles  and  each  overhead  call  to  SORT 
takes  approximately  300  cycles.  Thus,  the  total 
execution  time  is  on  the  order  of  200  *  N  *  log2N  +  .300 
*  (2  «  N  +  1). 

Program  Size:  206  bytes 

Data  Memory  Required:  8  bytes  anywhere  in 
RAM  for  pointers  to  the  first  and  last  elements  of  a 
partition  (2  bytes  starting  at  addresses  FIRST  and 
LAST,  respectively),  a  pointer  to  the  bottom  of  the 
stack  (2  bytes  starting  at  address  STKBTM),  and  the 
original  value  of  the  stack  pointer  (2  bytes  starting  at 
address  OLDSP). 

Special  Case:  If  the  stack  overflows  (i.e.,  comes 
too  close  to  its  boundary),  the  program  exits  with 
the  Carry  flag  set  to  I . 


Arranges  an  array  of  unsigned  word-length 
elements  into  ascending  order  using  a  quicksort 
algorithm.  Each  iteration  selects  an  element  and 
divides  the  array  into  two  parts,  one  consisting 
of  elements  larger  than  the  selected  element  and 
the  other  consisting  of  elements  smaller  than  the 
selected  element.  Elements  equal  to  the  selected 
element  may  end  up  in  either  part.  The  parts  are 
then  sorted  recursively  in  the  same  way.  The 
algorithm  continues  until  all  parts  contain  either 
no  elements  or  only  one  element.  An  alternative 
is  to  stop  recursion  when  a  part  contains  few 
enough  elements  (say,  less  than  20)  to  make  a 
bubble  sort  practical. 

The  parameters  are  the  array's  base  address, 
the  address  of  its  last  element,  and  the  lowest 
available  stack  address.  The  array  can  thus 
occupy  all  available  memory,  as  long  as  there  is 
room  for  the  stack.  Since  the  procedures  that 
obtain  the  selected  element,  compare  elements, 
move  forward  and  backward  in  the  array,  and 
swap  elements  are  all  subroutines,  they  could  be 
changed  readily  to  handle  other  types  of  elements. 

Ideally,  quicksort  should  divide  the  array  in 
half  during  each  iteration.  How  closely  the 
procedure  approaches  this  ideal  depends  on 
how  well  the  selected  element  is  chosen.  Since 
this  element  serves  as  a  midpoint  or  pivot,  the 
best  choice  would  be  the  central  value  (or 
median).  Of  course,  the  true  median  is  unknown. 
A  simple  but  reasonable  approximation  is  to 
select  the  median  of  the  first,  middle,  and  last 
elements. 

Procedure:  The  program  first  deals  with  the 
entire  array.  It  selects  the  median  of  the  current 
first,  last,  and  middle  elements  to  use  in  dividing 
the  array.  It  moves  that  element  to  the  first 
position  and  divides  the  array  into  two  parts  or 
partitions.  It  then  operates  recursively  on  the 


parts,  dividing  them  further  into  parts  and  stop- 
ping when  a  part  contains  no  elements  or  only 
one  element.  Since  each  recursion  places  six 
bytes  on  the  stack,  the  program  must  guard 
against  stack  overflow  by  checking  whether  the 
stack  has  grown  to  within  a  small  buffer  of  its 
lowest  available  address. 

Note  that  the  selected  element  always  ends  up 
in  the  correct  position  after  an  iteration.  There- 
fore, it  need  not  be  included  in  either  partition. 

The  rules  for  choosing  the  middle  element  are 
as  follows,  assuming  that  the  first  element  is  #1: 

1.  If  the  array  has  an  odd  number  of  ele- 
ments, take  the  one  in  the  center.  For  example, 
if  the  array  has  1 1  elements,  take  #6. 

2.  If  the  array  has  an  even  number  of  ele- 
ments and  its  base  address  is  even,  take  the 
element  on  the  lower  (base  address)  side  of  the 
center.  For  example,  if  the  array  starts  in  0.300i6 
and  has  12  elements,  take  #6. 
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3.  If  the  array  has  an  even  number  of  ele- 
ments and  its  base  address  is  odd,  take  the 
element  on  the  upper  side  of  the  center.  For 
example,  if  the  array  starts  in  0301  ig  and  has  12 
elements,  take  #7. 


Entry  Conditions 

Base  address  of  array  in  HL 
Address  of  last  word  of  array  in  DE 
Lowest  available  stack  address  in  BC 


Exit  Conditions 

Array  sorted  into  ascending  order,  considering 
the  elements  as  unsigned  words.  Thus,  the 
smallest  unsigned  word  ends  up  stored  starting 
at  the  base  address.  Carry  =  0  if  the  stack  did 
not  overflow  and  the  result  is  proper.  Carry  =  1 
if  the  stack  overflowed  and  the  final  array  is 
not  sorted. 


Example 


1.     Data:      Length  (size)  of  array  =  OC|j 

Elements  =  2B|(,,  57|g,  ID^,  26,5, 
22,6,  2E|„0C,„44,„ 
17,„4B,„  37,6,  27,6 

Result:     The  result  of  the  first  iteration  is: 

Selected  element  =  median  of  the  first 
(#1  =  2B,6),  middle  (#6  =  2E,6),  and  last 
(#12  =  27,6)  elements.  The  selected  ele- 
ment is  therefore  #1  (28,6),  and  no  swap- 
ping is  necessary  since  it  is  already  in  the 
first  position. 

At  the  end  of  the  iteration,  the  array  is 

27,6,  17,6,  1D,„  26,6. 
22,,,  0C,6,  2B,6,  44,6, 
2E,6,4B,6,  37,6,  57,6. 

The  first  partition,  consisting  of  elements 
less  than  2B,6,  is  27,6,  '7,6,  1D,6.  26,6,  22,6, 
and  OC,f,. 

The  second  partition,  consisting  of  ele- 
ments greater  than  2B,6,  is  44,6,  2E|6,  46,6, 
37,6,  and  57,6. 

Note  that  the  selected  element  (2B,6)  is 


now  in  the  correct  position  and  need  not  be 
included  in  either  partition. 

The  first  partition  may  now  be  sorted  recur- 
sively in  the  same  way: 

Selected  element  =  median  of  the  first 
(#1  =  27, j).  middle  (#3  =  IDij),  and  last 
(#7  =  OC|g)  elements.  Here,  #4  is  the 
median  and  must  be  exchanged  initially 
with  #1. 

The  final  order  of  the  elements  in  the  first 
partition  is 

OC,e,  17,6,  1D,6,  26,6,  22,6,  27,6- 

The  first  partition  of  the  first  partition 
(consisting  of  elements  less  than  ID,,)  is 
OC I , ,  1 7 1 5 .  This  will  be  referred  t o  as  t he  ( 1 , 1 ) 
partition. 

The  second  partition  of  the  first  partition 
(consisting  of  elements  greater  than  ID, 6)  is 
26,6,  22,6,  and  27,6- 

As  in  the  first  iteration,  the  selected  ele- 
ment (ID,,)  is  in  the  correct  position  and 
need  not  be  considered  further. 
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The  (1,1)  partition  may  now  be  sorted 
recursively  as  follows: 

Selected  element  =  median  of  the  first 
(#1  =  OCff,),  middle  (#1  =  OCi^),  and  last 
(#2  =  17|j)  elements.  Thus  the  selected  ele- 
ment is  the  first  element  (#1  =  OC^)  and  no 
initial  swap  is  necessary. 

The  final  order  is  obviously  the  same  as  the 
initial  order,  and  the  two  resulting  partitions 
contain  0  and  1  elements,  respectively.  Thus 
the  next  iteration  concludes  the  recursion, 
and  the  other  partitions  are  sorted  by  the 


same  method.  Obviously,  quicksort's  over- 
head is  large  when  the  number  of  elements  is 
small.  This  is  why  one  might  use  a  bubble 
sort  once  quicksort  has  created  small  enough 
partitions. 

Note  that  the  example  array  does  not  con- 
tain any  identical  elements.  During  an  itera- 
tion, elements  that  are  the  same  as  the 
selected  element  are  never  moved.  Thus  they 
may  end  up  in  either  partition.  Strictly  speak- 
ing, then,  the  two  partitions  consist  of  ele- 
ments "less  than  or  possibly  equal  to  the 
selected  element"  and  elements  "greater  than 
or  possibly  equal  to  the  selected  element." 
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Title  Quicksort 
Name :  QSORT 


Purpose;  Arrange  an  array  of  unsigned  words  into 

ascending  order  using  quicksort,  with  a 
maximum  size  of  32,767  words 


Entry! 


Register  pair  HL  =  Address  of  first  word  in  the 
array 
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Exit: 


Register  pair  DE  =  Address  of  last  word  in  the 
array 

Register  pair  BC  =  Lowest  available  stack 
address 

If  the  stack  did  not  overflow  then 

array  is  sorted  into  ascending  order. 
Carry  flag  =  0 

Else 

Carry  flag  =  1 


Registers  used:  AF,BC,DE,HL 


Time; 


The  timing  is  highly  data-dependent  but  the 
quicksort  algorithm  takes  approximately 
N  »  log  (N)  loops  through  PARTLP.  There  will  be 
2  »  N+1  calls  to  Sort.  The  number  of  recursions 
will  probably  be  a  fraction  of  N  but  if  all 
data  is  the  same,  the  recursion  could  be  up  to 
N.  Therefore  the  amount  of  stack  space  should 
be  maximized.  NOTEi  Each  recursion  level  takes 
6  bytes  of  stack  space. 

In  the  above  discussion  N  is  the  number  of 
array  elements. 

For  example,   sorting  a  16,384-word  array  took 
about  27  seconds  and  1200  bytes  of  stack  space 
on  a  6  MHz  280. 


Size: 


Program  206  bytes 
Data  8  bytes 


QSORT: 


; WATCH  FOR  STACK  OVERFLOW 

? CALCULATE  A  THRESHOLD  TO  WARN  OF  OVERFLOW 

S    (10  BYTES  FROM  THE  END  OF  THE  STACK) 

(SAVE  THIS  THRESHOLD  FOR  LATER  COMPARISONS 

SALSO  SAVE  THE  POSITION  OF  THIS  ROUTINE'S  RETURN  ADDRESS 

;    IN  THE  EVENT  WE  MUST  ABORT  BECAUSE  OF  STACK  OVERFLOW 


PUSH 

HL 

J  SAVE  BASE  ADDRESS  OF  ARRAY 

LD 

HL,  10 

J  ADD  SMALL  BUFFER  (10  BYTES)  TO 

ADD 

HL,BC 

;   LOWEST  STACK  ADDRESS 

LD 

(STKBTM) ,HL 

;SAVE  SUM  AS  BOTTOM  OF  STACK 
;   FOR  FIGURING  WHEN  TO  ABORT 

LD 

HL,2 

J  SAVE  POINTER  TO  RETURN  ADDRESS 

ADD 

HL,SP 

;    IN  CASE  OF  ABORT 

LD 

(OLDSP>,HL 

POP 

HL 

(RESTORE  BASE  ADDRESS 

jWORK  RECURSIVELY  THROUGH  THE  QUICKSORT  ALGORITHM  AS 
}  FOLLOWS: 
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5      1.   CHECK  IF  THE  PARTITION  CONTAINS  0  OR  1  ELEMENT. 
?  MOVE  UP  A  RECURSION  LEVEL  IF  IT  DOES. 

t     2.   USE  MEDIAN  TO  OBTAIN  A  REASONABLE  CENTRAL  VALUE 
5  FOR  DIVIDING  THE  CURRENT  PARTITION  INTO  TWO 

J  PARTS. 

t     3.   MOVE  THROUGH  ARRAY  SWAPPING  ELEMENTS  THAT 

f  ARE  OUT  OF  ORDER  UNTIL  ALL  ELEMENTS  BELOW  THE 

?  CENTRAL  VALUE  ARE  AHEAD  OF  ALL  ELEMENTS  ABOVE 

;  THE  CENTRAL  VALUE.     SUBROUTINE  COMPARE 

!  COMPARES  ELEMENTS,   SWAP  EXCHANGES  ELEMENTS, 

J  PREV  MOVES  UPPER  BOUNDARY  DOWN  ONE  ELEMENT, 

!  AND  NEXT  MOVES  LOWER  BOUNDARY  UP  ONE  ELEMENT. 

;     4.   CHECK  IF  THE  STACK  IS  ABOUT  TO  OVERFLOW.     IF  IT 

?  IS,   ABORT  AND  EXIT. 

f     5.  ESTABLISH  THE  BOUNDARIES  FOR  THE  FIRST  PARTITION 

I  (CONSISTING  OF  ELEMENTS  LESS  THAN  THE  CENTRAL  VALUE) 

J  AND  SORT  IT  RECURSIVELY. 

J     6.  ESTABLISH  THE  BOUNDARIES  FOR  THE  SECOND  PARTITION 
I  (CONSISTING  OF  ELEMENTS  GREATER  THAN  THE  CENTRAL 

?  VALUE)  AND  SORT  IT  RECURSIVELY. 

SORT: 

;SAVE  BASE  ADDRESS  AND  FINAL  ADDRESS  IN  LOCAL  STORAGE 
LD  (FIRST), HL  jSAVE  FIRST  IN  LOCAL  AREA 

EX  DE,HL 

LD  (LAST),HL  sSAVE  LAST  IN  LOCAL  AREA 

J  CHECK  IF  PARTITION  CONTAINS  0  OR  1  ELEMENTS 
I  IT  DOES  IF  FIRST  IS  EITHER  LARGER  THAN  (0) 
J  OR  EQUAL  TO  (1)  LAST. 

PART I ON: 

J  STOP  WHEN  FIRST  >=  LAST 
;DE  =  ADDRESS  OF  FIRST 
;HL  =  ADDRESS  OF  LAST 

LD  A,E  ! CALCULATE  FIRST  -  LAST 

SUB  L  ;  MUST  KEEP  BOTH,   SO  USE  8-BIT  SUBTRACT 

LD  A,D 
SBC  A, H 

RET  NC  ;1F  DIFFERENCE  POSITIVE,  RETURN 

?  THIS  PART  IS  SORTED 

?USE  MEDIAN  TO  FIND  A  REASONABLE  CENTRAL  (PIVOT)  ELEMENT 
J  MOVE  CENTRAL  ELEMENT  TO  FIRST  POSITION 

CALL        MEDIAN  j SELECT  CENTRAL  ELEMENT,   MOVE  IT 

;   TO  FIRST  POSITION 

LD  CO  ;BIT  0  OF  REGISTER  C  =  DIRECTION 

;  IF  IT'S  0  THEN  DIRECTION  IS  UP 
5   ELSE  DIRECTION  IS  DOWN 

{REORDER  ARRAY  BY  COMPARING  OTHER  ELEMENTS  WITH 

!   CENTRAL  ELEMENT.     START  BY  COMPARING  THAT  ELEMENT  WITH 

;   LAST  ELEMENT.     EACH  TIME  WE  FIND  AN  ELEMENT  THAT 

f   BELONGS  IN  THE  FIRST  PART  (THAT  IS,    IT  IS  LESS  THAN 

J  THE  CENTRAL  ELEMENT),   SWAP  IT  INTO  THE  FIRST  PART  IF  IT 
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;    IS  NOT  ALREADY  THERE  AND  MOVE  THE  BOUNDARY  OF  THE 

i  FIRST  PART  DOWN  ONE  ELEMENT.     SIMILARLY,   EACH  TIME  WE 

J   FIND    AN  ELEMENT  THAT  BELONGS  IN  THE  SECOND  PART  (THAT 

!    IS,    IT  IS  GREATER  THAN  THE  CENTRAL  ELEMENT),   SWAP  IT  INTO 

!  THE  SECOND  PART  IF  IT  IS  NOT  ALREADY  THERE  AND  MOVE 

;   THE  BOUNDARY  OF  THE  SECOND  PART  UP  ONE  ELEMENT. 

! ULTIMATELY,  THE  BOUNDARIES  COME  TOGETHER 

;   AND  THE  DIVISION  OF  THE  ARRAY  IS  THEN  COMPLETE 

I  NOTE  THAT  ELEMENTS  EQUAL  TO  THE  CENTRAL  ELEMENT  ARE  NEVER 

;  SWAPPED  AND  SO  MAY  END  UP  IN  EITHER  PART 

PARTLPs 

?LOOP  SORTING  UNEXAMINED  PART  OF  THE  PARTITION 
}  UNTIL  THERE  IS  NOTHING  LEFT  IN  IT 

LD  A,E  SLOWER  BOUNDARY  -  UPPER  BOUNDARY 

SUB  L  J  MUST  KEEP  BOTH,  SO  USE  8-BIT  SUBTRACT 

LO  A,D 

SBC  A,H 

JR  NCDONE  jEXIT  WHEN  EVERYTHING  EXAMINED 

{COMPARE  NEXT  2  ELEMENTS.     IF  OUT  OF  ORDER,  SWAP  THEM 

J  AND  CHANGE  DIRECTION  OF  SEARCH 

5    IF  FIRST  >  LAST  THEN  SWAP 

CALL        COMPARE  ; COMPARE  ELEMENTS 

JR  C,OK  5  JUMP  IF  ALREADY  IN  ORDER 

JR  Z,OK  J  OF  IF  ELEMENTS  EQUAL 

! ELEMENTS  OUT  OF  ORDER.     SWAP  THEM 
CALL        SWAP  sSWAP  ELEMENTS 

INC  C  ! CHANGE  DIRECTION 

J  REDUCE  SIZE  OF  UNEXAMINED  AREA 

;1F  NEW  ELEMENT  LESS  THAN  CENTRAL  ELEMENT,  MOVE 
S  TOP  BOUNDARY  DOWN 

»IF  NEW  ELEMENT  GREATER  THAN  CENTRAL  ELEMENT,  MOVE 
J  BOTTOM  BOUNDARY  UP 

!lF  ELEMENTS  EQUAL,  CONTINUE  IN  LATEST  DIRECTION 

OK: 


UP: 


BIT 

0,C 

SBIT  0  OF  C  TELLS  WHICH  WAY  TO  GO 

JR 

Z.UP 

jJUMP  IF  MOVING  UP 

EX 

DE,HL 

CALL 

NEXT 

;ELSE  MOVE  TOP  BOUNDARY  DOWN  BY 

EX 

DE,HL 

?  ONE  ELEMENT 

JR 

PARTLP 

CALL 

PREV 

J  MOVE  BOTTOM  BOUNDARY  UP  BY 

t  ONE  ELEMENT 

JR 

PARTLP 

THIS  PARTITION  HAS  NOW  BEEN  SUBDIVIDED  INTO  TWO 
PARTITIONS.  ONE  STARTS  AT  THE  TOP  AND  ENDS  JUST 
ABOVE  THE  CENTRAL  ELEMENT.     THE  OTHER  STARTS 
JUST  BELOW  THE  CENTRAL  ELEMENT  AND  CONTINUES 
TO  THE  BOTTOM.     THE  CENTRAL  ELEMENT  IS  NOW  IN 
ITS  PROPER  SORTED  POSITION  AND  NEED  NOT  BE 
INCLUDED  IN  EITHER  PARTITION 
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DONE: 

? FIRST  CHECK  WHETHER  STACK  MIGHT  OVERFLOW 

J  IF  IT  IS  GETTING  TOO  CLOSE  TO  THE  BOTTOM,  ABORT 

f  THE  PROGRAM  AND  EXIT 

LD  HL,tSTKBTM)  j CALCULATE  STKBTM  -  SP 

OR  A  ! CLEAR  CARRY 

SBC  HL,SP 

JR  NC, ABORT  jEXIT  IF  STACK  TOO  LARGE 


{ESTABLISH  BOUNDARIES  FOR  FIRST  (LOWER)  PARTITION 
SLOWER  BOUNDARY  IS  SAME  AS  BEFORE 

J  UPPER  BOUNDARY  IS  ELEMENT  JUST  BELOW  CENTRAL  ELEMENT 
jTHEN  RECURSIVELY  QUICKSORT  FIRST  PARTITION 


PUSH 

DE 

fSAVE  ADDRESS  OF  CENTRAL  ELEMENT 

LD 

HL, (LAST) 

PUSH 

HL 

SSAVE  ADDRESS  OF  LAST 

EX 

DE,HL 

CALL 

PREV 

; CALCULATE  LAST  FOR  FIRST  PART 

EX 

DE.HL 

LD 

HL, (FIRST) 

! FIRST  IS  SAME  AS  BEFORE 

CALL 

SORT 

J  QUICKSORT  FIRST  PART 

I  ESTABLISH  BOUNDARIES  FOR  SECOND  (UPPER)  PARTITION 
? UPPER  BOUNDARY  IS  SAME  AS  BEFORE 

J  LOWER  BOUNDARY  IS  ELEMENT  JUST  ABOVE  CENTRAL  ELEMENT 

?THEN  RECURSIVELY  QUICKSORT  SECOND  PARTITION 

POP  DE  jLAST  IS  SAME  AS  BEFORE 

POP  HL  {CALCULATE  FIRST  FOR  SECOND  PART 

CALL  NEXT 

CALL        SORT  {QUICKSORT  SECOND  PART 

OR  A  {CARRY  =  0  FOR  NO  ERRORS 

RET 


{ERROR  EXIT  -  SET  CARRY 
ABORTS     LD  SP, (OLDSP) 

SCF 
RET 


TOP  OF  STACK  IS  ORIGINAL 

RETURN  ADDRESS 
INDICATE  ERROR  IN  SORT 
RETURN  TO  ORIGINAL  CALLER 


{ROUTINE:  MEDIAN 

{PURPOSE:  DETERMINE  WHICH  VALUE  IN  A  PARTITION 

{  SHOULD  BE  USED  AS  THE  CENTRAL  ELEMENT  OR  PIVOT 

{ENTRY:  DE  =  ADDRESS  OF  FIRST  VALUE 

{  HL  =  ADDRESS  OF  LAST  VALUE 

{EXIT:     DE  IS  ADDRESS  OF  CENTRAL  ELEMENT 

{REGISTERS  USED:  AF,BC,DE 

MEDIAN: 

{DETERMINE  ADDRESS  OF  MIDDLE  ELEMENT 

{   MIDDLE  :=  ALIGNED  (FIRST  +  LAST)  DIV  2 

LD  A,L  {ADD  ADDRESSES  OF  FIRST,  LAST 

ADD  A,E  {MUST  KEEP  BOTH,   SO  USE  8-EIT 

LD  C,A  {  ADD  INSTEAD  OF  16-EIT 
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LD 

A,H 

ADC 

A,D 

LD 

B,  A 

RR 

B 

» DIVIDE  SUM  BY  2,  BYTE  AT  A  TIME 

RR 

C 

RES 

o,c 

J  CLEAR  BIT  0  FOR  ALIGNMENT 

BIT 

0,E 

; ALIGN  MIDDLE  TO  BOUNDARY  OF  FIRST 

JR 

Z,MED1 

;   JUMP  IF  BIT  0  OF  FIRST  IS  0 

INC 

C 

;   ELSE  MAKE  BIT  0  OF  MIDDLE  1 

MEDl! 


{DETERMINE  WHICH  OF  FIRST, 
5  MEDIAN  (CENTRAL  VALUE) 
{COMPARE  FIRST  AND  MIDDLE 


MIDDLE,   LAST  IS 


PUSH 

LD 

LD 

CALL 

POP 

JR 


HL 
L,C 
H  B 

COMPARE 
HL 

NCMIDDl 


5  SAVE  LAST 


{COMPARE  FIRST  AND  MIDDLE 

{RESTORE  LAST 

{JUMP  IF  FIRST  >=  MIDDLE 


{WE  KNOW  (MIDDLE  >  FIRST) 

{  SO  COMPARE  MIDDLE  AND  LAST 

PUSH        DE  {SAVE  FIRST 

LD  E,C 

LD  D,B 

CALL        COMPARE  {COMPARE  MIDDLE  AND  LAST 

POP  DE  {RESTORE  LAST 

JR  CSWAPMF  {JUMP  IF  LAST  >=  MIDDLE 

JR  Z,SWAPMF  {   MIDDLE  IS  MEDIAN 

{WE  KNOW  (MIDDLE  >  FIRST)  AND  (MIDDLE  >  LAST) 
{   SO  COMPARE  FIRST  AND  LAST 

CALL        COMPARE  {COMPARE  FIRST  AND  LAST 

RET  NC  {RETURN  IF  LAST  >=  FIRST 

{  FIRST  IS  MEDIAN 
JR  SWAPLF  {ELSE  LAST  IS  MEDIAN 


{WE  KNOW  (FIRST  >=  MIDDLE) 
{  SO  COMPARE  FIRST  AND  LAST 


MIDDl: 


CALL  COMPARE 
RET  C 
RET  Z 


{COMPARE  LAST  AND  FIRST 
{RETURN  IF  LAST  >=  FIRST 
{   FIRST  IS  MEDIAN 


{WE  KNOW  (FIRST  >=  MIDDLE)  AND  (FIRST  >  LAST) 
{  SO  COMPARE  MIDDLE  AND  LAST 
PUSH  DE 
LD  E,C 
LD  D,B 
CALL  COMPARE 
POP  DE 
JR  C, SWAPLF 


{SAVE  FIRST 
{DE  =  MIDDLE 

{COMPARE  MIDDLE  AND  LAST 
{RESTORE  FIRST 
{JUMP  IF  LAST  >  MIDDLE 


{  LAST  IS  MEDIAN 
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f MIDDLE  IS  MEDIAN, 

SWAPMFs 

PUSH  HL 

LD  L,C 

LD  H,B 

CALL  SWAP 

POP  HL 
RET 


SWAP  IT  WITH  FIRST 
SSAVE  LAST 

?HL  =  ADDRESS  OF  MIDDLE 

;SWAP  MIDDLE,  FIRST 
f RESTORE  LAST 


?LAST  IS  MEDIAN,  SWAP  IT  WITH  FIRST 

SWAPLF: 

CALL        SWAP  ?SWAP  FIRST  AND  LAST 

RET 


; ROUTINES  NEXT 

; PURPOSE:  MAKE  HL  POINT  TO  NEXT  ELEMENT 
J  ENTRY;   HL  =  ADDRESS  OF  CURRENT  ELEMENT 
J  EX  ITS     HL  =  ADDRESS  OF  NEXT  ELEMENT 
! REGISTERS  USED:  HL 


NEXT! 

INC  HL  INCREMENT  TO  NEXT  ELEMENT 

INC  HL 

RET 


5  »KKK»»KKK«»«K«»»KK»«)*«»fKKK«»eK»» 

f ROUTINE:  PREV 

! PURPOSE:  MAKE  HL  POINT  TO  PREVIOUS  ELEMENT 
; ENTRY:   HL  =  ADDRESS  OF  CURRENT  ELEMENT 
>EXITs     HL  =  ADDRESS  OF  PREVIOUS  ELEMENT 
5  REGISTERS  USED:  HL 

PREV: 

DEC  HL  ; DECREMENT  TO  PREVIOUS  ELEMENT 

DEC  HL 

RET 


J  ROUTINE:  COMPARE 

{PURPOSE:  COMPARE  DATA  ITEMS  POINTED  TO  BY  DE  AND  HL 

SENTRY:   DE  =  ADDRESS  OF  DATA  ELEMENT  1 

!  HL  =  ADDRESS  OF  DATA  ELEMENT  2 

lEXIT:     IF  ELEMENT  1  >  ELEMENT  2  THEN 

?  C  =  O 

;  Z  =  O 

t  IF  ELEMENT  1  <  ELEMENT  2  THEN 

J  C  =  1 

f  Z  =  0 

J  IF  ELEMENT  1  =  ELEMENT  2  THEN 

;  C  =  O 

!  Z  =  1 

! REGISTERS  USED:  AF 
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COMPARE! 


INC 

HL 

; POINT  TO  HIGH  BYTES 

INC 

DE 

LD 

A, (DE) 

CP 

(HL) 

J  COMPARE  HIGH  BYTES 

DEC 

DE 

; POINT  TO  LOW  BYTES 

DEC 

HL 

RET 

NZ 

; RETURN  IF  HIGH  BYTES  NOT  EQUAL 

LD 

A, (DE) 

; OTHERWISE,  COMPARE  LOW  BYTES 

CP 

(HL) 

RET 

5  «S««»»K»«K»KKK»«K«»»K«KKKK«KKKS» 

; ROUTINE:  SWAP 

J  PURPOSE!   SWAP  ELEMENTS  POINTED  TO  BY  DE,HL 
; ENTRY!  DE  =  ADDRESS  OF  ELEMENT  1 
;  HL  =  ADDRESS  OF  ELEMENT  2 

J  EX  ITS     ELEMENTS  SWAPPED 
J  REG I STEPS  USED!  AF,B 

SWAP: 


;SWAP 

LOW  BYTES 

LD 

E, (HL) 

;GET  ELEMENT  2 

LD 

A, (DE) 

;GET  ELEMENT  1 

LD 

(HL),A 

; STORE  NEW  ELEMENT 

2 

LD 

A,B 

LD 

(DE),A 

; STORE  NEW  ELEMENT 

1 

INC 

HL 

INC 

DE 

jSWAP 

HIGH  BYTES 

LD 

B, (HL) 

5  GET  ELEMENT  2 

LD 

A, (DE) 

;GET  ELEMENT  1 

LD 

(HL),A 

; STORE  NEW  ELEMENT 

LD 

A,B 

LD 

(DE),A 

! STORE  NEW  ELEMENT 

DEC 

HL 

DEC 

DE 

RET 

FIRST: 
LAST! 
STKBTMs 
0LDSP8 


;DATA  SECTION 
DS  2 
DS  2 
DS  2 
DS  2 


J  POINTER  TO  FIRST  ELEMENT  OF  PART 
! POINTER  TO  LAST  ELEMENT  OF  PART 
! THRESHOLD  FOR  STACK  OVERFLOW 
; POINTER  TO  ORIGINAL  RETURN  ADDRESS 


SAMPLE  EXECUTION: 
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SC9F! 

?SORT  AN  ARRAY  BETWEEN  BEGBUF  (FIRST  ELEMENT* 
!   AND  ENDBUF  (LAST  ELEMENT) 

; START  STACK  AT  5000  HEX  AND  ALLOW  IT  TO  EXPAND 
t   AS  FAR  AS  4F00  HEX 

LD  SP,5000H  sSET  UP  A  STACK  AREA 

LD  BC,4F00H  jBC  =  LOWEST  AVAILABLE  STACK  ADDRESS 

LD  HL, BEGBUF  ?HL  =  ADDRESS  OF  FIRST  ELEMENT  OF  ARRAY 

LD  DE, ENDBUF  sDE  =  ADDRESS  OF  LAST  ELEMENT  OF  ARRAY 


CALL        QSORT  ?  SORT 

J  RESULT  FOR  TEST  DATA  IS 
;   0,1,2,3,    ...  ,14,15 

JR  SC9F  sLOOP  FOR  MORE  TESTS 


;DATA 

SECTION 

BEGBUF ! 

DW 

15 

DW 

14 

DW 

13 

DW 

12 

DW 

11 

DW 

10 

DW 

9 

DW 

3 

DW 

7 

DW 

6 

DW 

5 

DW 

4 

DW 

3 

DW 

2 

DW 

1 

ENDBUF: 

DW 

0 

END 


RAM  Test  (RAMTST) 
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Tests  a  RAM  area  specified  by  a  base  address 
and  a  length  in  bytes.  Writes  the  values  0,  FF15, 
AA16  (IOIOIOIO2),  and  55i6  (OIOIOIOI2)  into  each 
byte  and  checks  whether  they  can  be  read  back 
correctly.  Places  I  in  each  bit  position  of  each 
byte  and  checks  whether  it  can  be  read  back 
correctly  with  all  other  bits  cleared.  Clears  the 
Carry  flag  if  all  tests  run  properly.  If  it  finds  an 
error,  it  exits  immediately,  setting  the  Carry  flag 
and  returning  the  test  value  and  the  address  at 
which  the  error  occurred. 

Procedure:  The  program  performs  the  single 
value  checks  (with  0,  FFig,  AAig,  and  SSj^)  by 
first  fining  the  memory  area  and  then  comparing 
each  byte  with  the  specified  value.  Filling  the 
entire  area  first  should  provide  enough  delay 
between  writing  and  reading  to  detect  a  failure 
to  retain  data  (perhaps  caused  by  improperly 
designed  refresh  circuitry).  The  program  then 
performs  the  walking  bit  test,  starting  with  bit  7; 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  Approximately  633  cycles  per 
byte  tested  plus  663  cycles  overhead 

Program  Size:  82  bytes 

Data  Memory  Required:  None 

Special  Cases: 

1.  An  area  size  of  0000|j  causes  an  immediate 
exit  with  no  memory  tested.  The  Carry  flag  is 
cleared  to  indicate  no  errors. 

2.  Since  the  routine  changes  all  bytes  in  the 
tested  area,  using  it  to  test  an  area  that  includes 
itself  will  have  unpredictable  results. 

Note  that  Case  1  means  this  routine  cannot  be 
asked  to  test  the  entire  memory.  Such  a  request 
would  be  meaningless  anyway  since  it  would  re- 
quire the  routine  to  test  itself. 

3.  Testing  a  ROM  causes  a  return  with  an  error 
indication  after  the  first  occasion  on  which  the  test 
value  differs  from  the  memory's  contents. 


here  it  writes  the  data  into  memory  and  attempts 
to  read  it  back  immediately  for  a  comparison. 


Entry  Conditions 

Base  address  of  test  area  in  HL 
Size  of  test  area  in  bytes  in  DE 


Exit  Conditions 

If  an  error  is  found: 
Carry  =  1 

Address  containing  error  in  HL 
Test  value  in  A 
If  no  error  is  found: 
Carry  =  0 

All  bytes  in  test  area  contain  0 


Example 

1.     Data:     Base  address  =  0380|j  Result:     Area  tested  is  the  0200|g  bytes  starting  at 

Length  (size)  of  area  =  0200,5  address  038O|6,  that  is,  addresses  0380ig 

through  057F|5.  The  order  of  the  tests  is 
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1 .  Write  and  read  0 

2.  Write  and  read  FF|j 

3.  Write  and  read  AA,5  (lOlOlOlOj) 

4.  Write  and  read  55,6  (OlOlOIOlj) 

5.  Walking  bit  test,  starting  with  I  in 
bit  7,  That  is,  start  with  lOOOOOOOj 
(80,5)  and  move  the  1  one  position 
right  for  each  subsequent  test  of  a 
byte. 


Title 
Name: 


RAM  test 
RAMTST 


Purpose: 


Test  a  RAM  (read/write  memory)  area 

1)  Write  all  0  and  test 

2)  Write  all  FF  hex  and  test 

3)  Write  all  AA  hex  and  test 

4)  Write  all  55  hex  and  test 

5)  Shift  a  single  1  through  each  bit, 
while  clearing  all  other  bits 


If  the  program  finds  an  error,  it  exits 
imtnadlataly  with  th*  Carry  flag  set  and 

indicates  where  the  error  occurred  and 
what  value  it  used  in  the  test. 


Entry: 


Register  pair  HL 
Register  pair  DE 


Base  address  of  test  area 
Size  of  area  in  bytes 


Exit! 


If  there  are  no  errors  then 
Carry  flaa  =  0 

test  area  contains  0  in  all  bytes 
else 

Carry  flag  =  1 

Register  pair  HL  =  Address  of  error 
Register  A  =  Expected  value 


Registers  used:  AF,BC,DE.HL 


Time: 


Approximately  633  cycles  per  byte  plus 
663  cycles  overhead 


Size: 


Program  82  bytes 
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RAMTSTs 


JEXIT  WITH  NO  ERRORS  IF  AREA  SIZE  IS  0 

LD            A,D  5  TEST  AREA  SIZE 
OR  E 

RET           Z  jEXIT  WITH  NO  ERRORS  IF  SIZE  IS  ZERO 

LD            B,D  ;BC  =  AREA  SIZE 
LD  C,E 

fFILL  MEMORY  WITH  0  AND  TEST 
SUB  A 
CALL  FILCMP 

RET          C  5  EX  IT  IF  ERROR  FOUND 

J  FILL  MEMORY  WITH  FF  HEX   (ALL  I'S)  AND  TEST 
LD  A.OFFH 
CALL  FILCMP 

RET  C  ; EX  IT  IF  ERROR  FOUND 

;FILL  MEMORY  WITH  AA  HEX  (ALTERNATING  I'S  AND  O'S)  AND  TEST 
LD  A,OAAH 
CALL  FILCMP 

RET  C  ! EXIT  IF  ERROR  FOUND 

I  FILL  MEMORY  WITH  55  HEX  (ALTERNATING  O'S  AND  I'S)  AND  TEST 
LD  A,55H 
CALL  FILCMP 

RET  C  ; EXIT  IF  ERROR  FOUND 


WLKLP: 
WLKLPli 


; PERFORM  WALKING  BIT  TEST,     PLACE  A  1  IN  BIT  7  AND 

;   SEE  IF  IT  CAN  BE  READ  BACK.     THEN  MOVE  THE  1  TO 

;   BITS  6,  5,   4,   3,   2,    1,   AND  0  AND  SEE  IF  IT  CAN 
;   BE  READ  BACK 


LD 

A, lOOOOOOOB 

?MAKE  BIT  7  1,  ALL  OTHER  BITS  0 

LD 

(HL) , A 

; STORE  TEST  PATTERN  IN  MEMORY 

CP 

(HL) 

;TRY  TO  READ  IT  BACK 

SCF 

;SET  CARRY  IN  CASE  OF  ERROR 

RET 

NZ 

; RETURN  IF  ERROR 

RRCA 

; ROTATE  PATTERN  TO  MOVE  1  RIGHT 

CP 

lOOOOOOOB 

JR 

NZ,WLKLP1 

! CONTINUE  UNTIL  1  IS  BACK  IN  BIT  7 

LD 

(HL),0 

; CLEAR  BYTE  JUST  CHECKED 

INC 

HL 

DEC 

BC 

J  DECREMENT  AND  TEST  16-BIT  COUNTER 

LD 

A,B 

OR 

C 

JR 

NZ, WLKLP 

; CONTINUE  UNTIL  MEMORY  TESTED 

RET 

;N0  ERRORS  (NOTE  OR  C  CLEARS  CARRY) 

ROUTINE:  FILCMP 

PURPOSE:  FILL  MEMORY  WITH  A  VALUE  AND  TEST 
THAT  IT  CAN  BE  READ  BACK 
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5 ENTRY!  A  =  TEST  VALUE 

5  HL  =  BASE  ADDRESS 

J  EC  =  SIZE  OF  AREA  IN  BYTES 

;EXIT!  IF  NO  ERRORS  THEN 

S  CARRY  FLAG  IS  O 

;  ELSE 

5  CARRY  FLAG  IS  1 

;  HL  =  ADDRESS  OF  ERROR 

5  DE  =  BASE  ADDRESS 

J  BC  =  SIZE  OF  AREA  IN  BYTES 

f  A  =  TEST  VALUE 

5 REGISTERS  USED:  AF,BC,DE,HL 

FILCMP: 


COMPARE: 


PUSH 

HL 

jSAVE  BASE  ADDRESS 

PUSH 

BC 

SSAVE  SIZE  OF  AREA 

LD 

E,A 

jSAVE  TEST  VALUE 

LD 

(HL),A 

; STORE  TEST  VALUE  IN  FIRST  BYTE 

DEC 

BC 

s REMAINING  AREA  =  SIZE  -  1 

LD 

A,B 

; CHECK  IF  ANYTHING  IN  REMAINING  AREA 

OR 

C 

LD 

A,E 

; RESTORE  TEST  VALUE 

JR 

Z , COMPARE 

; BRANCH  IF  AREA  WAS  ONLY  1  BYTE 

5  FILL  REST  OF  AREA 

USING  BLOCK  MOVE 

?  EACH 

ITERATION  MOVES  TEST  VALUE  TO  NEXT  HIGHER  ADDRESS 

LD 

D,H 

; BEST I NAT I ON  IS  ALWAYS  SOURCE  +  1 

LD 

E,L 

INC 

DE 

LDIR 

jFILL  MEMORY 

;NOW  THAT  MEMORY  HAS  BEEN  FILLED,  TEST  TO  SEE  IF 

!  EACH 

BYTE  CAN  BE 

READ  BACK  CORRECTLY 

POP 

BC 

; RESTORE  SIZE  OF  AREA 

POP 

HL 

; RESTORE  BASE  ADDRESS 

PUSH 

HL 

;SAVE  EASE  ADDRESS 

PUSH 

BC 

J  SAVE  SIZE  OF  VALUE 

5  COMPARE  MEMORY  AND  TEST  VALUE 

CMPLP: 

CP  I 

JR  NZ,C.MPER  jJUMP  IF  NOT  EQUAL 

JP  PE, CMPLP  ! CONTINUE  THROUGH  ENTIRE  AREA 

J  NOTE  CP I  CLEARS  P/V  FLAG  IF  IT 
;  DECREMENTS  BC  TO  0 

SNO  ERRORS  FOUND,   SO  CLEAR  CARRY 

POP  BC  ;BC  =  SIZE  OF  AREA 

POP  HL  ;HL  =  BASE  ADDRESS 

OR  A  I  CLEAR  CARRY,    INDICATING  NO  ERRORS 

RET 

! ERROR  EXIT,  SET  CARRY 
!HL  =  ADDRESS  OF  ERROR 
!A  =  TEST  VALUE 
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CMPER: 

POP  BC  ;DE  =  SIZE  OF  AREA 

POP  DE  ;BC  =  BASE  ADDRESS 

^2t  'S^T  CARRY,   INDICATING  AN  ERROR 

RET 


SC9G: 


SAMPLE  EXECUTION 


;TEST  RAM  FROM  2000  HEX  THROUGH  300F  HEX 

J     SIZE  OF  AREA  =  1010  HEX  BYTES 

LD  HL,2000H  ;HL  =  BASE  ADDRESS 

LD  DE,1010H  ;DE  =  NUMBER  OF  BYTES 

CALL        RAMTST  ;TEST  MEMORY 

; CARRY  FLAG  SHOULD  BE  0 

■JR  SC9G  (LOOP  FOR  MORE  TESTING 


END 


Jump  Table  (JTAB) 


9H 


Registers  Used:  AF 

Execution  Time:  117  cycles  overhead,  besides  the 
time  required  to  execute  the  actual  subroutine 

Program  Size:  21  bytes  plus  2  *  LENSUB  bytes  for 
the  table  of  starting  addresses,  where  LENSUB  is  the 
number  of  subroutines 

Data  Memory  Required:  None 

Special  Case:  Entry  with  an  index  greater  than  or 
equal  to  LENSUB  causes  an  immediate  exit  with 
the  Carry  flag  set  to  1 . 


Transfers  control  to  an  address  selected  from 
a  table  according  to  an  index.  The  addresses  are 
stored  in  the  usual  Z80  format  (less  significant 
byte  first),  starting  at  address  JMPTAB.  The 
size  of  the  table  (number  of  addresses)  is  a 
constant,  LENSUB,  which  must  be  less  than  or 
equal  to  128.  If  the  index  is  greater  than  or  equal 
to  LENSUB,  the  program  returns  control  imme- 
diately with  the  Carry  flag  set  to  1 . 

Procedure:  The  program  first  checks  if  the 
index  is  greater  than  or  equal  to  the  size  of  the 
table  (LENSUB).  If  it  is,  the  program  returns 
control  with  the  Carry  flag  set.  If  it  is  not,  the 
program  obtains  the  starting  address  of  the 
appropriate  subroutine  from  the  table  and  jumps 
to  it. 


Entry  Conditions 

Index  in  A 


Example 

1.     Data:        LENSUB  (size  of  subroutine  table)  =  0.^ 
Table  consists  of  addresses  SUBO,  SUBl, 

and  SUB2. 
Index  =  (A)  =  02 

Result:        Control  transferred  to  address  SUB2 
(PC  =  SUB2) 


Exit  Conditions 

If  (A)  is  greater  than  LENSUB,  an  immediate 
return  with  Carry  =  1.  Otherwise,  control  is 
transferred  to  the  appropriate  subroutine  as  if 
an  indexed  call  had  been  performed.  The  return 
address  remains  at  the  top  of  the  stack. 
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Title  Jump  table 

Name:  JTAB 


Purposes  Given  an  index,   jump  to  the  subrQutine  with 

that  Index  in  a  table. 

Entry:  Register  A  is  the  subroutine  number   (0  to 

LENSUB-1,  the  number  of  subroutines) 
LENSUB  must  be  less  than  or  equal  to 
128. 

Exits  If  the  routine  number  is  valid  then 

execute  the  routine 
el  se 

Carry  flag  =  1 

Registers  useds  AF 


Time:  117  cycles  plus  execution  time  of  subroutine 

Sizes  Program  21  bytes  plus  size  of  table  C2«LENSUB) 


SEXIT  WITH  CARRY  SET  IF  ROUTINE  NUMBER  IS  INVALID 
fTHAT  IS,    IF  IT  IS  TOO  LARGE  FOR  TABLE  OLENSUB  -  1) 

JTAB: 


CP 

LENSUB 

jCOMPARE  ROUTINE  NUMBER,   TABLE  SIZE 

CCF 

; COMPLEMENT  CARRY  FOR  ERROR  INDICATOR 

RET 

C 

; RETURN  IF  ROUTINE  NUMBER  TOO  LARGE 

!   WITH  CARRY  SET 

? INDEX 

INTO  TABLE  OF 

WORD-LENGTH  ADDRESSES 

; LEAVE 

REGISTER  PAIRS 

UNCHANGED  SO  THEY  CAN  BE  USED 

?  FOR 

PASSING  PARAMETERS 

PUSH 

HL 

J  SAVE  HL 

ADD 

A,  A 

; DOUBLE  INDEX  FOR  WORD-LENGTH  ENTRIES 

LD 

HL, JMPTAB 

J  INDEX  INTO  TABLE  USING  8-BIT 

ADD 

A,L 

;   ADDITION  TO  AVOID  DISTURBING 

LD 

L,A 

;  ANOTHER  REGISTER  PAIR 

LD 

A,0 

ADC 

A,H 

LD 

H,  A 

J  ACCESS  ROUTINE  ADDRESS 

; OBTAIN  ROUTINE  ADDRESS  FROM  TABLE  AND  TRANSFER 

5     CONTROL  TO  IT,  LEAVING  ALL  REGISTER  PAIRS  UNCHANGED 
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LD 

INC 

LD 

LD 

EX 

RET 

LENSUB  EQU 
JMPTAB; 

DW 
DW 
DM 


A, (HL) 
HL 

H, (HL) 
L,  A 

(SP),HL 


SUBO: 


SUBl! 


SUE2: 


SUBO 
SUBl 
SUB2 


fMOVE  ROUTINE  ADDRESS  TO  HL 


; RESTORE  OLD  HL,  PUSH  ROUTINE  ADDRESS 
;JUMP  TO  ROUTINE 

; NUMBER  OF  SUBROUTINES  IN  TABLE 

;JUMP  TABLE 
; ROUTINE  0 
; ROUTINE  1 
; ROUTINE  2 


; THREE  TEST  SUBROUTINES  FOR  JUMP  TABLE 

A,l  jTEST  ROUTINE  0  SETS  tA)  =  1 


LD 
RET 


LD 
RET 


LD 
RET 


A, 2 


A, 3 


J  TEST  ROUTINE  1  SETS  (A)  =2 


sTEST  ROUTINE  2  SETS  (A) 


SC9H! 


SAMPLE  EXECUTION: 


SUB 
CALL 


JTAB 


? EXECUTE  ROUTINE  0 

;  AFTER  EXECUTION,    (A)  =  1 
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LD 

A,l 

5 EXECUTE  ROUTINE  1 

CALL 

JTAB 

;  AFTER  EXECUTION,    (A)  = 

2 

LD 

A, 2 

? EXECUTE  ROUTINE  2 

CALL 

JTAB 

;  AFTER  EXECUTION,    (A)  = 

3 

LD 

A, 3 

J  EXECUTE  ROUTINE  3 

CALL 

JTAB 

!   AFTER  EXECUTION,  CARRY 

JR 

SC9H 

;LOOP  FOR  MORE  TESTS 

END 


Read  a  Line  from  a  Terminal  (RDLINE) 


10A 


Reads  a  line  of  ASCII  characters  ending  with 
a  carriage  return  and  saves  them  in  a  buffer. 
Defines  the  control  characters  Control  H  (08 
hex),  which  deletes  the  latest  character,  and 
Control  X  ( 18  hex),  which  deletes  the  entire  One. 
Sends  a  bell  character  (07  hex)  to  the  terminal  if 
the  buffer  overflows.  Echoes  each  character 
placed  in  the  buffer.  Echoes  non-printable  char- 
acters as  an  up  arrow  or  caret  {")  followed  by  the 
printable  equivalent  (see  Table  10-1).  Sends  a 
new  line  sequence  (typically  carriage  return,  line 
feed)  to  the  terminal  before  exiting. 

RDLINE  assumes  the  following  system-depen- 
dent subroutines: 

1.  RDCHAR  reads  a  character  from  the 
terminal  and  puts  it  in  the  accumulator. 

2.  WRCHAR  sends  the  character  in  the 
accumulator  to  the  terminal. 

3.  WRNEWL  sends  a  new  line  sequence  to 
the  terminal. 

These  subroutines  are  assumed  to  change  all 
user  registers. 

RDLINE  is  an  example  of  a  terminal  input 
handler.  The  control  characters  and  I  /  O  subrou- 
tines in  a  real  system  will,  of  course,  be  cornputer- 
dependent.  A  specific  example  in  the  listing  is 
for  a  computer  running  the  CP/M  operating 
system  with  a  standard  Basic  Disk  Operating 
System  (BDOS)  accessed  by  calling  memory 
address  0005,6.  Table  10-2  lists  commonly  used 
CP/M  BDOS  functions.  For  more  information 
on  CP/M,  see  Osborne  CP/M  User  Guide, 
Second  Edition  by  Thom  Hogan  (Berkeley: 
Osborne/ McGraw-Hill,  1982). 

Procedure:  The  program  starts  the  loop  by 
reading  a  character.  If  the  character  is  a  carriage 
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Registers  Used:  AF,  BC,  DE,  hi 

Execution  Time:  Approximately  162  cycles  to  place 
an  ordinary  character  in  the  buffer,  not  including  the 
execution  time  of  RDCHAR  or  WRCHAR 

Program  Size:  148  bytes 

Data  iMemory  Required:  None 

Speciai  Cases: 

1.  Typing  Control  H  (delete  one  character)  or 
Control  X  (delete  the  entire  line)  when  the  buffer  is 
empty  has  no  effect. 

2.  The  program  discards  an  ordinary  character 
received  when  the  buffer  is  full,  and  sends  a  bell 
character  to  the  terminal  (ringing  the  bell). 


return,  the  program  sends  a  new  line  sequence  to 
the  terminal  and  exits.  Otherwise,  it  checks  for 
the  special  characters  Control  H  and  Control  X. 
If  the  buffer  is  not  empty,  Control  H  makes  the 
program  decrement  the  buffer  pointer  and  char- 
acter count  by  1  and  send  a  backspace  string 
(cursor  left,  space,  cursor  left)  to  the  terminal. 
Control  X  makes  the  program  delete  characters 
until  it  empties  the  buffer. 

If  the  character  is  not  special,  the  program 
determines  whether  the  buffer  is  full.  If  it  is,  the 
program  sends  a  bell  character  to  the  terminal. 
If  not,  the  program  stores  the  character  in  the 
buffer,  echoes  it  to  the  terminal,  and  increments 
the  character  count  and  buffer  pointer. 

Before  echoing  a  character  or  deleting  one 
from  the  display,  the  program  must  determine 
whether  the  character  is  printable.  If  it  is  not 
(that  is,  it  is  a  non-printable  ASCII  control 
character),  the  program  must  display  or  delete 
two  characters,  the  control  indicator  (up  arrow 
or  caret)  and  the  printable  equivalent  (see  Table 
10-1 ).  Note,  however,  that  the  character  is  stored 
in  its  non-printable  form. 
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Table  10-1:  ASCII  Control  Characters  and  Printable  Equivalents 


Name 

Hex  Value 

Printable 

Name 

rlex  Value 

Print  a  hip 

Equivalent 

IT  HI  1  i  vn  Ipnt 

NUL 

00 

Control  @ 

DLE 

10 

Control  P 

SOH 

01 

Control  A 

DCl 

11 

Control  Q 

STX 

02 

Control  B 

DC2 

12 

Control  R 

ETX 

03 

Control  C 

DC3 

13 

Control  S 

EOT 

04 

Control  D 

DC4 

14 

Control  T 

ENQ 

05 

Control  E 

NAK 

15 

Control  U 

ACK 

06 

Control  F 

SYN 

16 

Control  V 

BEL 

07 

Control  G 

ETB 

17 

Control  W 

BS 

08 

Control  H 

CAN 

18 

Control  X 

HT 

09 

Control  1 

EM 

19 

Control  Y 

LF 

OA 

Control  J 

SUB 

lA 

Control  Z 

VT 

OB 

Control  K 

ESC 

IB 

Control  [ 

FF 

OC 

Control  L 

FS 

IC 

Control 

CR 

OD 

Control  M 

GS 

ID 

Control  ] 

SO 

OE 

Control  N 

RS 

IE 

Control  " 

SI 

OF 

Control  O 

VS 

IF 

Control  

Table  10-2:  BDOS  Functions  for  CP/ M  2.0 


Function 

Output 

Number 

Function 

Input 

(Decimal  In 

Name 

Parameters 

Parameters 

Register  C) 

0 

System  Reset 

None 

None 

1 

Console  Input 

None 

A  =  ASCII  character 

2 

Console  Output 

E  =  ASCII  character 

None 

3 

Reader  Input 

None 

A  =  ASCII  character 

4 

Punch  Output 

E=  ASCII  character 

None 

5 

List  Output 

E=  ASCII  character 

None 

6 

Direct  Console  Input 

E=FF„ 

A  =  ASCII  character  or  00 

if  no  character  is  available 

6 

Direct  Console  Output 

E  =  ASCII  character 

None 

7 

Get  I/O  Byte 

None 

A  = lOBYTE 

8 

Set  I/O  Byte 

E  =  lOBYTE 

None 

9 

Print  String 

DE  =  String  Address 

None 

10 

Read  Console  Buffer 

DE  =  Buffer  Address 

(Data  in  buffer) 

11 

Get  Console  Status 

None 

A  =  00  (no  character)  or  A  = 

FF|j  (character  ready) 
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Entry  Conditions  Exit  Conditions 

Base  address  of  buffer  in  HL  Number  of  characters  in  the  buffer  in  A 

Length  (size)  of  buffer  in  bytes  in  A 


Examples 

I.     Data:      Line  from  keyboard  is  'ENTERcr' 
Result:     Character  count  =  5  (line  length) 
Buffer  contains  'ENTER' 
'ENTER'  is  sent  to  terminal,  followed  by  a 
new  line  sequence  (typically  either  carriage 
return,  line  feed  or  just  carriage  return). 
Note  that  the  'cr'  (carriage  return)  character 
does  not  appear  in  the  buffer. 


2,     Data:      Line  from  keyboard  is 'DMcontrolHNcontrol 
XENTETcontrolHRcr' 
Result:      Character  count  =  5  (length  of  final  line) 

Buffer  contains  'ENTER' 

'DMBackspaceStringNBackspaceStringBack- 
spaceStringENTETBackspaceStringR'  is 
sent  to  terminal,  followed  by  a  new  hne 
sequence.  The  Backspace  String  deletes  a 
character  from  the  screen  and  moves  the 
cursor  left  one  space. 

The  sequence  of  operations  is  as  follows: 


What  has  happened  is 

a.  The  operator  types  'D',  'M'. 

b.  The  operator  sees  that  'M'  is  wrong  (it 
should  be  'N'),  types  Control  H  to  delete  it,  and 
types  'N'. 

c.  The  operator  then  sees  that  the  initial  'D'  is 
also  wrong  (it  should  be  'E').  Since  the  error  is 
not  in  the  latest  character,  the  operator  types 
Control  X  to  delete  the  entire  Hne,  and  then 
types  'ENTET'. 

d.  The  operator  sees  that  the  second  'T'  is 
wrong  (it  should  be  'R'),  types  Control  H  to 
delete  it,  and  types  'R'. 

e.  The  operator  types  a  carriage  return  to  end 
the  line. 


Character      Initial         Final  Sent  to 

Typed  Buffer        Buffer  Terminal 


D 

Empty 

'D' 

D 

M 

'D' 

'DM' 

M 

Control  H 

'DM' 

'D' 

Backspace  string 

N 

'D' 

'DN' 

N 

Control  X 

'DN' 

Empty 

2  Backspace  strings 

E 

Empty 

'E' 

E 

N 

'E' 

'EN' 

N 

T 

'EN' 

'ENT' 

T 

E 

'ENT' 

'ENTE' 

E 

T 

'ENTE' 

'ENTET' 

T 

Control  H 

'ENTET' 

'ENTE' 

Backspace  string 

R 

'ENTE' 

•ENTER" 

R 

cr 

'ENTER' 

'ENTER' 

New  line  string 
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Title  Read  1  ine 

Name:  RDLINE 


Purpcise:  Read  characters  from  CP/M  BDOS  CONs  device 

until  carriage  return  encountered.   All  control 
characters  but  the  following  are  placed  in  the 
buffer  and  displayed  as  the  equivalent  printable 
ASCII  character  preceded  by  a  caret. 

Control  H:   delete  last  character 

Control  X;  delete  entire  line 


Entry: 

Register  pair  HL  =  Base  address  of  buffer 

Register  A  =  Length  of  buffer  in  bvtes 

Exit: 

Register  A  =  Number  of  characters  in  buffer 

Registers  used: 

AF,  BC,  DE,  HL 

Time : 

Not  applicable 

Size: 

Program  148  bytes 

; EQUATES 

BELL 

ESU 

07H 

jBELL  CHARACTER  (RINGS  BELL  ON  TERMINAL) 

BSKEY 

EQU 

03H 

; BACKSPACE  KEYBOARD  CHARACTER 

C:R 

EQU 

ODH 

! CARRIAGE  RETURN  FOR  CONSOLE 

CRKEY 

EQU 

ODH 

! CARRIAGE  RETURN  KEYBOARD  CHARACTER 

CSRLFT 

EQU 

08H 

sMOVE  CURSOR  LEFT  FOR  CONSOLE 

DELKEY 

EQU 

18H 

; DELETE  LINE  KEYBOARD  CHARACTER 

LF 

EQU 

OAH 

sLINE  FEED  FOR  CONSOLE 

SPACE 

EQU 

20H 

; SPACE  CHARACTER 

UPARRW 

EQU 

5EH 

sUP  ARROW  OR  CARET  USED  AS  CONTROL  INDICATOR 

BDOS 

EQU 

0005H 

J BDOS  ENTRY  POINT 

DIRIO 

EQU 

6 

;BDOS  DIRECT  I/O  FUNCTION 

PSTRG 

EQU 

9 

;BDOS  PRINT  STRING  FUNCTION 

STERM 

EQU 

!CP/M  STRING  TERMINATOR 

RDLINE: 

LD 

C.  A 

iC  =  BUFFER  LENGTH 

sHL  =  BUFFER  POINTER 
; INITIALIZE  CHARACTER  COUNT  TO  ZERO 

INIT: 

LD  B.O  : CHARACTER  COUNT  =  0 

fREAD  CHARACTERS  UNTIL  A  CARRIAGE  RETURN  IS  TYPED 
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RDLOOP: 

CALL        RDCHAR  ; READ  CHARACTER  FROM  KEYBOARD  -  NO  ECHO 

: CHECK  FOR  CARRIAGE  RETURN.   EXIT  IF  FOUND 
CP  CRKEY 

JR            Z.EXITRD  SEND  OF  LINE  IF  CARRIAGE  RETURN 

; CHECK  FOR  BACKSPACE  AND  DELETE  CHARACTER  IF  FOUND 
CP  BSKEY 

JR            NZ.RDLPl  f BRANCH  IF  NOT  BACKSPACE 

CALL        BACKSP  ; IF  BACKSPACE,   DELETE  ONE  CHARACTER 

JR            RDLOOP  ;   THEN  START  READ  LOOP  AGAIN 


RDLPli 


DELI: 


; CHECK  FOR  DELETE  LINE  CHARACTER  AND  EMPTY  BUFFER  IF  FOUND 


5  BRANCH  IF  NOT  DELETE  LINE 


CP 

DELKEY 

JR 

NZ . RDLP2 

CALL 

BACKSP 

JR 

NZ,DEL1 

JR 

RDLOOP 

! DELETE  A  CHARACTER 
; CONTINUE  UNTIL  BUFFER  EMPTY 
■.THIS  ACTUALLY  BACKS  UP  OVER 
;   CHARACTER  RATHER  THAN  JUST 
!   UP  A  LINE 


EACH 
MOVING 


;NOT  A  SPECIAL  CHARACTER 

!   CHECK  IF  BUFFER  IS  FULL 

;    IF  FULL,   RING  BELL  AND  CONTINUE 

;    IF  NOT  FULL,   STORE  CHARACTER  AND  ECHO 

RDLP2! 


STRCH: 


LD 

E,A 

jSAVE  CHARACTER 

LD 

A,B 

; IS  BUFFER  FULL? 

CP 

c 

;   COMPARE  COUNT  AND  BUFFER  LENG' 

JR 

C, STRCH 

JJUMP  IF  BUFFER  NOT  FULL 

LD 

A.BELL 

sFULL,   RING  THE  TERMINAL'S  BELL 

CALL 

WRCHAR 

JR 

RDLOOP 

sTHEN  CONTINUE  THE  READ  LOOP 

; BUFFER 

NOT  FULL. 

STORE  CHARACTER 

LD 

A.E 

!GET  CHARACTER  BACK 

LD 

f,HL),  A 

; STORE  CHARACTER  IN  BUFFER 

INC 

HL 

! INCREMENT  BUFFER  POINTER 

INC 

B 

; INCREMENT  CHARACTER  COUNT 

: IF  CHARACTER  IS  CONTROL,   THEN  OUTPUT 

;   UP  ARROW  FOLLOWED  BY  PRINTABLE  EQUIVALENT 


CP 

SPACE 

; CONTROL  IF  LESS  THAN  SPACE  (20  HEX) 

JR 

NCPRCH 

{JUMP  IF  A  PRINTABLE  CHARACTER 

PUSH 

AF 

sSAVE  CHARACTER 

LD 

A, UPARRW 

(WRITE  UP  ARROW  OR  CARET 

CALL 

WRCHAR 

POP 

AF 

! RECOVER  CHARACTER 

ADD 

A,4C)H 

J  CHANGE  TO  PRINTABLE  FORM 

CALL 

WRCHAR 

;ECHO  CHARACTER  TO  TERMINAL 

JR 

RDLOOP 

;THEN  CONTINUE  READ  LOOP 
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SEXIT 

iSEND  NEW  LINE  SEGJUENCE  (USUALLY  CR.LF)  TO  TERMINAL 
5  GET  LENGTH  OF  LINE 

EXITRD: 

CALL         WRNEWL  ; SEND  NEW  LINE  SEQUENCE 

LD  A,B  :LINE  LENGTH  =  CHARACTER  COUNT 

RET 


RDCHAR: 


; ROUTINE:  RDCHAR 

! PURPOSE;  READ  CHARACTER  BUT  DO  NOT  ECHO  TO  CONSOLE 
; ENTRY:  NONE 

:EXIT!     REGISTER  A  =  CHARACTER 

; REGISTERS  USED:   ALL  EXCEPT  BC.  HL 


PUSH 
PUSH 


HL 

BC 


SAVE  ECHL 


RDWAIT: 


:WAIT  FOR  CHARACTER  FROM  CONSOLE 


LD 
LD 

CALL 

OR 

JR 


C.DIRIO 
E,OFFH 
BDOS 
A 

Z. RDWAIT 


; DIRECT  CONSOLE  I/O 

; INDICATE  INPUT 

iREAD  CHARACTER  FROM  CONSOLE 

sLOOP  IF  NO  CHARACTER   (A  =  0) 


POP 
POP 
RET 


DE 
HL 


!  RESTORE  BCHL 

[RETURN  WITH  CHARACTER  IN  REGISTER  A 


WRCHAR: 


! ROUTINE:  WRCHAR 

; PURPOSE!   WRITE  CHARACTER  TO  CONSOLE 
! ENTRY:   REGISTER  A  =  CHARACTER 
;EXIT!  NONE 

; REGISTERS  USED:   ALL  EXCEPT  BC.  HL 


PUSH 
PUSH 


HL 

BC 


I  SAVE  BC,  HL 


! WRITE  A  CHARACTER 
LD  CDIRIO 
LD  E,  A 

CALL  BDOS 


[DIRECT  CONSOLE  I/O 

[INDICATE  OUTPUT  -  CHARACTER  IN  E 

(WRITE  CHARACTER  ON  CONSOLE 


POP 
POP 
RET 


EC 
HL 


[RESTORE  BCHL 


; ROUTINE:  WRNEWL 

5  PURPOSE:    ISSUE  NEW  LINE  SEQUENCE  TO  CONSOLE 
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WRNEWL: 


NORMALLY,   THIS  IS  A  CARRIAGE  RETURN  AND 
LINE  FEED,   BUT  SOME  COMPUTERS  REQUIRE  ONLY 
A  CARRIAGE  RETURN. 

ENTRY:  NONE 

EXIT:  NONE 

REGISTERS  USED:   ALL  EXCEPT  BCHL 


PUSH  HL 
PUSH  BC 


:SAVE  BC.HL 


:SEND  NEW  LINE  STRING  TO  CONSOLE 


CALL 

POP 
POP 
RET 


DE,NLSTRG 
WRSTRG 

EC 
HL 


! POINT  TO  NEW  LINE  STRING 
iSEND  STRING  TO  CONSOLE 

I  RESTORE  EC,  HL 


NLSTRG:   DB  CR.LF.STERM  : NEW  LINE  STRING 

;   NOTE:   SIERM  (*)    IS  CP/M  TERMINATOR 

ROUTINE:  BACKSP 

PURPOSE:   PERFORM  A  DESTRUCTIVE  BACKSPACE 
ENTRY:   B  =  NUMBER  OF  CHARACfERS  IN  BUFFER 
HL  =  NEXT  AVAILABLE  BUFFER  ADDRESS 
EXIT:      IF  NO  CHARACTERS  IN  BUFFER 
Z  =  1 
ELSE 
Z  =  0 

CHARACTER  REMOVED  FROM  BUFFER 
REGISTERS  USED:   ALL  EXCEPT  C,  HL 

■g:    -1^ -nf  5=7  K  W  W  W       ^ef  ii^    -1^  W  ii*  3^  W  K  W 


BACKSP: 


CHECK  FOR  EMPTY  BUFFER 
LD  A,B 
OR  A 
RET  Z 


! TEST  NUMBER  OF  CHARACTERS 
lEXIT  IF  BUFFER  EMPTY 


BSl: 


.•OUTPUT  BACKSPACE  STRING 

;   7  0  REMOVE  CHARACTER  FROM  DISPLAY 

; DECREMENT  BUFFER  POINTER 
!SAVE  BC,  HL 


DEC 

HL 

PUSH 

HL 

PUSH 

BC 

LD 

A, (HL) 

CP 

20H 

JR 

NCBSl 

LD 

DE, BSSTRG 

CALL 

WRSTRG 

LD 

DE, BSSTRG 

CALL 

WRSTRG 

POP 

BC 

POP 

HL 

;GET  CHARACTER 
;  IS  IT  A  CONTROL? 

!   NO,   BRANCH,   DELETE  ONLY  ONE  CHARACTER 
!   YES,   DELETE  2  CHARACTERS 
:      (UP  ARROW  AND  PRINTABLE  EQUIVALENT) 
; WRITE  BACKSPACE  STRING 

; WRITE  BACKSPACE  STRING 
: RESTORE  BC,  HL 
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! DECREMENT  CHARACTER  COUNT  BY  1 

DEC  B  jONE  LESS  CHARACTER  IN  BUFFER 

RET 


BSSTRG: 


WRSTRG: 


DESTRUCTIVE  BACKSPACE  STRING  FOR  CONSOLE 

MOVES  CURSOR  LEFT,   PRINTS  SPACE  OVER  CHARACTER.  MOVES 

CURSOR  LEFT 
NOTE:   STERM  ($>    IS  CP/M  STRING  TERMINATOR 
DB  CSRLFT, SPACE, CSRLFT, STERM 

; ROUTINE:  WRSTRG 

; PURPOSE:   OUTPUT  STRING  TO  CONSOLE 
; ENTRY:   HL  =  BASE  ADDRESS  OF  STRING 
sEXIT:  NONE 

; REGISTERS  USED:   ALL  EXCEPT  EC 


PUSH 
LD 

CALL 

POP 

RET 


EC 

CPSTRG 

BOOS 

EC 


SAVE  EC 

FUNCTION  IS  PRINT  STRING 
OUTPUT  STRING  TERMINATED  WITH 
RESTORE  BC 


SAMPLE  EXECUTION: 


; EQUATES 


PROMPT 
SClOA: 


TLOOP; 


EQU 

! OPERATOR  PROMPT  =  QUESTION  MARK 

;  READ 

LINE  FROM  CONSOLE 

LD 

A, PROMPT 

;  OUTPUT  PROMPT   (.  ?) 

CALL 

WRCHAR 

LD 

HL, INEUFF 

!HL  =  INPUT  BUFFER  ADDRESS 

LD 

A.LINBUF 

;A  =  BUFFER  LENGTH 

CALL 

RDLINE 

sREAD  A  LINE 

OR 

A 

;TEST  LINE  LENGTH 

JR 

Z,SC10A 

jNEXT  LINE  IF  LENGTH  IS  0 

?ECHO 

LINE  TO  CONSOLE 

LD 

B,A 

jSAVE  NUMBER  OF  CHARACTERS  IN  BUFFER 

LD 

HL, INBUFF 

; POINT  TO  START  OF  BUFFER 

LD 

A, (HL) 

! OUTPUT  NEXT  CHARACTER 

CALL 

WRCHAR 

INC 

HL 

! INCREMENT  BUFFER  POINTER 

DJNZ 

TLOOP 

; DECREMENT  CHARACTER  COUNT 

:   CONTINUE  UNTIL  ALL  CHARACTERS  SENT 

CALL 

WRNEWL 

jTHEN  END  WITH  CR,LF 

JR 

SCI  OA 
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jDATA  SECTION 

LINEUP     E0U  16  (LENGTH  OF  INPUT  BUFFER 

INBUFF:   DS  LINBUF  ; INPUT  BUFFER 

END 


Write  a  Line  to  an  Output  Device  (WRLINE)     1 0B 


Registers  Used:  AF,  BC,  DE,  HL 

Execution  Time:  18  cycles  overhead  plus  43  cycles 
per  byte  besides  the  execution  time  of  subroutine 
WRCHAR 

Program  Size:  22  bytes 

Data  Memory  Required:  None 

Special  Case:  An  empty  buff  er  causes  an  immediate 
exit  with  nothing  sent  to  the  output  device. 


Writes  characters  until  it  empties  a  buffer 
with  given  length  and  base  address.  Assumes  the 
system-dependent  subroutine  WRCHAR,  which 
sends  the  character  in  the  accumulator  to  the 
output  device. 

WRLINE  is  an  example  of  an  output  driver. 
The  actual  I/O  subroutines  will,  of  course,  be 
computer-dependent.  A  specific  example  in  the 
listing  is  for  a  CP/M-based  computer  with  a 
standard  Basic  Disk  Operating  System  (BDOS) 
accessed  by  calling  address  0005,(,. 

Procedure:  The  program  exits  immediately  if 
the  buffer  is  empty.  Otherwise,  it  sends  characters 


to  the  output  device  one  at  a  time  until  it  empties 
the  buffer.  The  program  saves  all  temporary 
data  in  memory  rather  than  in  registers  to 
avoid  dependence  on  WRCHAR. 


Entry  Conditions  Exit  Conditions 

Base  address  of  buffer  in  HL  None 
Number  of  characters  in  the  buffer  in  A 


Example 

1 .     Data:      Number  of  characters  =  5 
Buffer  contains  'ENTER' 
Result:     'ENTER'  sent  to  the  output  device 


Title 
Name ; 


Write  line 
WRLINE 
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Purpose: 
Entry: 

Exit : 


Write  characters  to  CP/M  EDOS  CON:  device 

Register  pair  HL  =  Base  address  of  buffer 
Register  A  =  Number  of  characters  in  buffer 

None 


Registers  used:  All 

Time:  Not  applicable 

Size;     .  Program  22  bytes 


BDOS 
DIRIO 

WRLINE: 


WRLLPs 


; EQUATES 

EQU  0005H 

EQU  6 


;EDCiS  ENTRY  POINT 

;BDOS  DIRECT  I/O  FUNCTION 


sEXIT  IMMEDIATELY  IF  BUFFER  IS  EMPTY 
OR  A  ;TEST  NUMBER  OF  CHARACTERS 

RET  Z  ;   RETURN  IF  BUFFER  EMPTY 

LD  B,A  ;B  =  COUNTER 

;HL  =  BASE  ADDRESS  OF  BUFFER 

;LOOP  SENDING  CHARACTERS  TO  OUTPUT  DEVICE 


LD 
CALL 
INC 
DJNZ 

RET 


A, (HL) 
WRCHAR 
HL 

WRLLP 


SGET  NEXT  CHARACTER 

?SEND  CHARACTER  TO  OUTPUT  DEVICE 

! INCREMENT  BUFFER  POINTER 

5  DECREMENT  COUNTER 

;   CONTINUE  UNTIL  ALL  CHARACTERS  SENT 


; ROUTINE:  WRCHAR 

{PURPOSE:   WRITE  CHARACTER  TO  OUTPUT  DEVICE 

: ENTRY!   REGISTER  A  =  CHARACTER 

;EXIT:  NONE 

J  REGISTERS  USED:  AF,DE 

WRCHAR: 


PUSH 

HL 

sSAVE  EC,  HL 

PUSH 

EC 

LD 

C, DIRIO 

; DIRECT  I/O  FUNCTION 

LD 

E,A 

J  CHARACTER  IN  REGISTER 

CALL 

BDOS 

: OUTPUT  CHARACTER 

POP 

EC 

! RESTORE  EC,  HL 

POP 

HL 

RET 

10B  WRITE  A  LINE  TO  AN  OUTPUT  DEVICE  (WRLINE^  367 


SAMPLE  EXECUTION: 


RCBUF 


EQU 


10 


iBDOS  READ  CONSOLE  BUFFER  FUNCTION 


BOOS  READ  CONSOLE  BUFFER  FUNCTION  USES 
THE  FOLLOWING  BUFFER  FORMAT: 

BYTE  0       :   BUFFER  LENGTH  (MAXIMUM  NUMBER  OF  CHARACTERS) 
BYTE  1       :   NUMBER  OF  CHARACTERS  READ  (LINE  LENGTH) 
BYTE  2  ON:   ACTUAL  CHARACTERS 


f  CHARACTER  EQUATES 
CR  EQU  ODH 

LF  EQU  OAH 

PROMPT     EQU  ■'?' 


; CARRIAGE  RETURN  FOR  CONSOLE 

;LINE  FEED  FOR  CONSOLE 

; OPERATOR  PROMPT  =  QUESTION  MARK 


SCI OB: 


;READ  LINE  FROM  CONSOLE 


LD 

CALL 

LD 

LD 

CALL 

LD 

CALL 


A, PROMPT 

WRCHAR 

DE, INBUFF 

C, RCBUF 

BDOS 

A,LF 

WRCHAR 


? WRITE  LINE  TO  CONSOLE 


LD 

LD 

INC 

CALL 

LD 

LD 

CALL 


HL, INEUFF+1 

A,M 

HL 

WRLINE 
HL,CRLF 
A, 2 

WRLINE 


; OUTPUT  PROMPT  (?) 

; POINT  TO  INPUT  BUFFER 
sBDOS  READ  LINE  FUNCTION 
;READ  LINE  FROM  CONSOLE 
; OUTPUT  LINE  FEED 


? POINT  AT  LENGTH  BYTE  RETURNED  BY  CP/M 
!GET  LENGTH  OF  LINE 

; POINT  TO  FIRST  DATA  BYTE  OF  INBUFF 
jWRITE  LINE 

; OUTPUT  CARRIAGE  RETURN,  LINE  FEED 
; LENGTH  OF  CRLF  STRING 
; WRITE  CRLF  STRING 


JR 


SCI  OB 


[CONTINUE 


jDATA  SECTION 
CRLF:       DB  CR,LF 
LINBUF     EQU  lOH 
INBUFF:   DB  LINBUF 

DS  LINBUF 


; CARRIAGE  RETURN,   LINE  FEED 
J  LENGTH  OF  INPUT  BUFFER 
; LENGTH  OF  INPUT  BUFFER 
;DATA  BUFFER 


END 


CRO-16  Cheeking  and  Generofion 

(IC^16,CRC16,GCRC16) 


10C 


Generates  a  16-bit  cyclic  redundancy  check 
(CRC)  based  on  the  IBM  Binary  Synchronous 
Communications  protocol  (BSC  or  Bisync). 
Uses  the  polynomial  X'"  +  X's  +  +  1 .  Entry 
point  ICRC16  initializes  the  CRC  to  0  and  the 
polynomial  to  the  appropriate  bit  pattern.  Entry 
point  CRC  16  combines  the  previous  CRC  with 
the  CRC  generated  from  the  current  data  byte. 
Entry  point  GCRC16  returns  the  CRC. 

Procedure:  Subroutine  ICRC16  initializes  the 
CRC  to  0  and  the  polynomial  to  a  1  in  each  bit 
position  corresponding  to  a  power  of  X  present 
in  the  formula.  Subroutine  CRC  16  updates  the 
CRC  for  a  data  byte.  It  shifts  both  the  data  and 
the  CRC  left  eight  times;  after  each  shift,  it 
EXCLUSIVE-ORs  the  CRC  with  the  polynomial 
if  the  EXCLUSIVE-OR  of  the  data  bit  and  the 
CRC's  most  significant  bit  is  1.  Subroutine 
CRC  16  leaves  the  CRC  in  memory  locations 
CRC  (less  significant  byte)  and  CRC+1  (more 


Registers  Used: 

1.  ICRC16:  HL 

2.  CRC  16:  None 

3.  GCRC16:  HL 
Execution  Time: 

1.  ICRC 16:  62  cycles 

2.  CRC  16:  148  cycles  overhead  plus  an  average  of 
584  cycles  per  data  byte,  assuming  that  the  previous 
CRC  and  the  polynomial  must  be  EXCLUSIVE-ORed 
in  half  of  the  iterations 

3.  GCRCI6:  26  cycles 
Program  Size: 

1.  ICRC16:   13  bytes 

2.  CRC  16:    39  bytes 

3.  GCRCI6:  4  bytes 

Data  (Memory  Required:  4  bytes  anywhere  in 

RAM  for  the  CRC  (2  bytes  starting  at  address  CRC) 
and  the  polynomial  (2  bytes  starting  at  address  PLY) 


significant  byte).  Subroutine  GCRC 16  loads  the 
CRC  into  HL. 


Entry  Conditions 

1.  ICRC  16:  none 

2.  CRC16:  data  byte  in  A,  previous  CRC  in 
memory  locations  CRC  (less  significant  byte) 
and  CRC+ 1  (more  significant  byte),  CRC  polynomial 
in  memory  locations  PLY  (less  significant  byte) 
and  PLY+1  (more  significant  byte) 

.3.  GCRC16:  CRC  in  memory  locations  CRC 
(less  significant  byte)  and  CRC+ 1  (more  significant 
byte) 


Exit  Conditions 

1 .  ICRC  16: 0  (initial  CRC  value)  in  memory 
locations  CRC  (less  significant  byte)  and 
CRC+1  (more  significant  byte),  CRC 
polynomial  in  memory  locations  PLY  (less 
significant  byte)  and  PLY+ 1  (more  significant 
byte) 

2.  CRC16:  CRC  with  current  data  byte  in- 
cluded in  memory  locations  CRC  (less  significant 
byte)  and  CRC+1  (more  significant  byte) 

3.  GCRC16:  CRC  in  HL 
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Examples 

1 .  Generating  a  CRC 

a.  Call  1CRC16  for  initialization  and  to  start  the  CRC 
at  0. 

b.  Call  CRC  16  repeatedly  to  update  the  CRC  for  each 
data  byte, 

c.  Call  GCRC16  to  obtain  the  final  CRC. 

Note  that  only  ICRC 16  depends  on  the  particular 
CRC  polynomial  used.  To  change  the  polynomial, 
simply  change  the  data  ICRC  16  loads  into 


2.  Checking  a  CRC 

a.  Call  ICRCI6  for  initialization  and  to  start  the  CRC 
at  0. 

b.  Call  CRC  16  repeatedly  to  update  the  CRC  for  each  data 
byte  (including  the  stored  CRC)  for  checking. 

c.  Call  GCRC16  to  obtain  the  final  CRC;  it  will  be  0  if 
there  were  no  errors. 

memory  locations  PLY  (less  significant  byte) 
and  PLY+1  (more  significant  byte). 


REFERENCE 

J.E.McNamara.  Technical  Aspects  of  Data  Communications, 2nd  ed.  Billerica,  Mass.: 
Digital  Press,  1982.  This  book  contains  explanations  of  CRC  and  communications 
protocols. 


Title  Generate  CRC-16 

Names  CRC 16 


Purpose:  Generate  a  16-bit  CRC  based  on  IBM  s  Binary 

Synchronous  Cornrouni  cat  ions  protocol.  The  CRC  is 
based  on  the  polynomial: 

(*   indicates  "to  the  power".l 
XM6  +  XMS  +  X*2  +•  1 


1)     Call   ICRC16  to  initialize  the  CRC 
polynomial  and  clear  the  CRC. 

2.)     Call  CRC16  for  each  data  byte. 

3)     Call  GCRC16  to  obtain  the  CRC. 

It  should  then  be  appended  to  the  data, 
high  byte  first. 
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To  check  a  CRCs 

1)  Call  ICRC16  to  initialize  the  CRC. 

2)  Call  CRC16  for  each  data  byte  and 

the  2  bytes  of  CRC  previously  generated. 

3)  Call  GCRC16  to  obtain  the  CRC.   It  will 
be  zero  if  no  errors  occurred. 


Entry: 


I CRC 16  -  None 

CRC16  -  Register  A  =  Data  byte 
GCRC16  -  None 


Exit! 


ICRC16  -  CRC,  PLY  initialized 
CRC16    -  CRC  updated 
0CRC16  -  HL  =  CRC 


Registers  used!  None 


Time ! 


Size: 


148  cycles  overhead  plus  an  average  of  584 
cycles  per  byte,   assuming  that  half  the 
iterations  require  EXCLUSIVE-ORing  the  CRC 
and  the  polynomial. 

Program  56  bytes 
Data  4  bytes 


C:RC16! 


;rclp: 


jSAVE 

REGISTERS 

PUSH 

AF 

PUSH 

EC 

PUSH 

DE 

PUSH 

HL 

;  LOOP 

THROUGH  EACH 

BIT  GENERATING  THE  CRC 

LD 

B,S 

;8  BITS  PER  BYTE 

LD 

DE, (PLY) 

;GET  POLYNOMIAL 

LD 

HL, (CRC) 

jGET  CURRENT  CRC  VALUE 

LD 

C,  A 

fSAVE  DATA  C 

AND 

lOOOOOOOB 

;GET  BIT  7  OF  DATA 

xor 

H 

; EXCLUSIVE -OR  BIT  7  WITH  BIT  15  OF  CRC 

LD 

H,  A 

ADD 

HL,HL 

! SHIFT  CRC  LEFT 

jr 

NCCRCLPl 

J  JUMP  IF  BIT  7  OF  EXCLUSIVE-OR  WAS  0 

;BIT  7 

WAS  1,   SO  EXCLUSIVE-OR  CRC  WITH  POLYNOMIAL 

LD 

A,E 

jGET  LOW  BYTE  OF  POLYNOMIAL 

XOR 

L 

J  EXCLUSIVE- OR  WITH  LOW  BYTE  OF  CRC 

LD 

L,A 

LD 

A,D 

;GET  HIGH  BYTE  OF  POLYNOMIAL 

XOR 

H 

jEXCLUSIVE -OR  WITH  HIGH  BYTE  OF  CRC 

LD 

H,A 
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CRCLPl: 


GCRCld.! 


LD  A,C 
RLA 

DJNZ  CRCLP 

LD  (CRO.HL 


RESTORE  DATA 

SHIFT  NEXT  DATA  BIT  TO  BIT  7 
DECREMENT  BIT  COUNTER 

JUMP  IF  NOT  THROUGH  S  BITS 
SAVE  UPDATED  CRC 


ICRC16! 


! RESTORE  REGISTERS  AND  EXIT 

POP  HL 

POP  DE 

POP  EC; 

POP  AF 

RET 

f ROUTINE:  ICRC16 

! PURPOSE:    INITIALIZE  CRC  AND  PLY 
J  ENTRY;  NONE 

sEXIT;     CRC  AND  POLYNOMIAL  INITIALIZED 
; REGISTERS  USED:  HL 

LD  HL,0  ;CRC  =  0 

LD  (CRC),HL 

LD  HL,08005H  ; PLY  =  8005H 

LD  (.PLY.),HL  ;S005H  IS  FOR  X '  16h-X '  15+-X ' 2+1 

;A  1   IS  IN  EACH  BIT  POSITION 
!   FOR  WHICH  A  POWER  APPEARS  IN 
;   THE  FORMULA  (BITS  0,   2,   AND  15) 

RET 

; ROUTINE:  GCRC16 

; PURPOSE;   GET  CRC  VALUE 

; ENTRY:  NONE 

;EXIT:     REGISTER  PAIR  HL  =  CRC  VALUE 
5 REGISTERS  USED:  HL 

LD  HL, (CRC)  ;HL  =  CRC 

RET 


;  DATA 

CRC:        DS  2  ; CRC  VALUE 

PLY:         DS  2  ; POLYNOMIAL  VALUE 


SAMPLE  EXECUTION: 


; GENERATE  A  CRC  FOR  THE  NUMBER  1  AND  CHECK  IT 

SCIOC: 
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GENLP: 


CHKLP: 


CALL 

I CRC 16 

; INITIALIZE  CRC,  POLYNOMIAL 

LD 

A,  1 

J  GENERATE  CRC  FOR  1 

CALL 

CRC  1 6 

CALL 

GCRC16 

EX 

DE.HL 

-.SAVE  CRC  IN  DE 

CALL 

I CRC 16 

; INITIALIZE  AGAIN 

LD 

A,  1 

CALL 

CRC  16 

! CHECK  CRC  BY  GENERATING  IT  FOR  DAJf 

LD 

A,D 

CALL 

CRC  16 

;   AND  STORED  CRC  ALSO 

LD 

A,E 

CALL 

CRC  16 

CALL 

GCRC16 

;CRC  SHOULD  EE  ZERO  IN  HL 

f GENERATE  CRC  FOR  THE 

CALL 

I CRC 16 

; INITIALIZE  CRC,  POLYNOMIAL 

LD 

B,0 

; START  DATA  BYTES  AT  0 

LD 

A,B 

;GET  DATA  BYTE 

CALL 

CRC  16 

; UPDATE  CRC 

INC 

B 

!ADD  1  TO  PRODUCE  NEXT  DATA  BYTE 

JR 

NZ, GENLP 

; BRANCH  IF  NOT  DONE 

CALL 

GCRC16 

;GET  RESULTING  CRC 

EX 

DE,HL 

fAND  SAVE  IT  IN  DE 

J  CHECK 

CRC  BY  GENERATING  IT  AGAIN 

CALL 

I CRC 16 

; INITIALIZE  CRC,  POLYNOMIAL 

LD 

B,  0 

; START  DATA  BYTES  AT  0 

LD 

A,B 

;GET  DATA  BYTE 

CALL 

CRC  16 

; UPDATE  CRC 

INC 

B 

;ADD  1  TO  PRODUCE  NEXT  DATA  BYTE 

JR 

NZ, CHKLP 

J  ALSO 

INCLUDE  STORED 

CRC  IN  CHECK 

LD 

A,D 

; UPDATE  FOR  HIGH  BYTE  OF  STORED  CRC 

CALL 

CRC  16 

LD 

A,E 

! UPDATE  FOR  LOW  BYTE  OF  STORED  CRC 

CALL 

CRC  16 

CALL 

GCRC16 

;GET  RESULTING  CRC 

! IT  SHOULD  BE  0 

JR 

SCIOC 

END 
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Registers  Used: 

1.  lOHDLR:  AF,BC,DE,HL,IX 

2.  INITDL;  HL 

3.  ADDDL:  DE 
ExecuHon  Time: 

1.  lOHDLR:  270  cycles  overhead  plus  90  cycles 
for  each  unsuccessf  ul  match  of  a  device  number 

2.  iNITDL:  36  cycles 

3.  ADDDL:  72  cycles 
Program  Size: 

1.  lOHDLR:  70  bytes 

2.  INITDL:  7  bytes 

3.  ADDDL;  12  bytes 

Data  IVIemory  Required:  3  bytes  anywhere  in 
RAM  for  the  device  list  header  (2  bytes  starting  at 
address  DVLST)  and  temporary  storage  for  data  to 
be  written  without  a  buffer  (1  byte  at  address 
BDATA) 


Performs  input  and  output  in  a  device- 
independent  manner  using  I/O  control  blocks 
and  an  I/O  device  table.  The  I/O  device  table  is 
a  linked  list;  each  entry  contains  a  link  to  the 
next  entry,  the  device  number,  and  starting 
addresses  for  routines  that  initialize  the  device, 
determine  its  input  status,  read  data  from  it, 
determine  its  output  status,  and  write  data  to  it. 
An  I/O  control  block  is  an  array  containing  the 
device  number,  operation  number,  device  status, 
and  the  base  address  and  length  of  the  device's 
buffer.  The  user  must  provide  lOHDLR  with  the 
base  address  of  an  I/O  control  block  and  the 
data  if  only  one  byte  is  to  be  written.  lOHDLR 
returns  the  status  byte  and  the  data  (if  only  one 
byte  is  read). 

This  subroutine  is  an  example  of  handling 
input  and  output  in  a  device-independent  man- 
ner. The  I  /  O  device  table  must  be  constructed 
using  subroutines  INITDL,  which  initializes  the 
device  list  to  empty,  and  ADDDL,  which  adds  a 
device  to  the  list. 

An  applications  program  will  perform  input 
or  output  by  obtaining  or  constructing  an  I/O 
control  block  and  then  calling  lOHDLR.  lOHDLR 
uses  the  I/O  device  table  to  determine  how  to 
transfer  control  to  the  I/O  driver. 

Procedure:  The  program  first  initializes  the 
status  byte  to  0,  indicating  no  errors.  It  then 
searches  the  device  table,  trying  to  match  the 
device  number  in  the  I/O  control  block.  If  it 
does  not  find  a  match,  it  exits  with  an  error 
number  in  the  status  byte.  If  it  finds  a  match,  it 


checks  for  a  vahd  operation  and  transfers  control 
to  the  appropriate  routine  from  the  device  table 
entry.  That  routine  must  end  by  transferring 
control  back  to  the  original  caller.  If  the  operation 
is  invalid  (the  operation  number  is  too  large  or 
the  starting  address  for  the  routine  is  0),  the 
program  returns  with  an  error  number  in  the 
status  byte. 

Subroutine  INITDL  initializes  the  device  list, 
setting  the  initial  link  to  0. 

Subroutine  ADDDL  adds  an  entry  to  the 
device  list,  making  its  base  address  the  head  of 
the  list  and  setting  its  link  field  to  the  old  head  of 
the  list. 


Entry  Conditions  Exit  Conditions 

1.  lOHDLR:    Base  address  of  input/ output        1.  lOHDLR:    I/O  control  block  status  byte 
control  block  in  IX  in  A  if  an  error  is  found; 
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Data  byte  (if  the  operation  is 
to  write  one  byte)  in  A 

2.  INITDL:  None 

3.  ADDDL:  Base  address  of  a  device  table 

entry  in  HL 


otherwise,  the  routine  exits 
to  the  appropriate  I/O  driver. 
Data  byte  in  A  if  the  opera- 
tion is  to  read  one  byte 

2.  INITDL:    Device  Ust  header  (addresses 

DVLST  and  DVLST+1) 
cleared  to  indicate  empty  list 

3.  ADDDL:    Device  table  entry  added  to 

list 


Example 

1.  The  example  in  the  listing  uses  the  following  structure: 
Input/ Output  Operations 

Operation 

Number  Operation 

0  Initialize  device 

1  Determine  input  status 

2  Read  I  byte  from  input  device 

3  Read  N  bytes  (normally  I  line)  from  input 

device 

4  Determine  output  status 

5  Write  1  byte  to  output  device 

6  Write  N  bytes  (normally  1  line)  to  output 

device 


Input/Output  Control  Blocic 

Index  Contents 

0  Device  number 

1  Operation  number 

2  Status 

3  Less  significant  byte  of  base  address  of 

buffer 

4  More  significant  byte  of  base  address  of 

buffer 

5  Less  significant  byte  of  buffer  length 

6  More  significant  byte  of  buffer  length 

Device  Table  Entry 

Index  Contents 

0         Less  significant  byte  of  link  field  (base  address 
of  next  entry) 


1  More  significant  byte  of  link  field  (base  address 

of  next  entry) 

2  Device  number 

3  Less  significant  byte  of  starting  address  of 

device  initialization  routine 

4  More  significant  byte  of  starting  address  of 

device  initialization  routine 

5  Less  significant  byte  of  starting  address  of 

input  status  determination  routine 

6  More  significant  byte  of  starting  address  of 

input  status  determination  routine 

7  Less  significant  byte  of  starting  address  of 

input  driver  (read  I  byte  only) 

8  More  significant  byte  of  starting  address  of 

input  driver  (read  I  byte  only) 

9  Less  significant  byte  of  starting  address  of 

input  driver  (N  bytes  or  1  line) 

10  More  significant  byte  of  starting  address  of 

input  driver  (N  bytes  or  1  line) 

1 1  Less  significant  byte  of  starting  address  of 

output  status  determination  routine 

12  More  significant  byte  of  starting  address  of 

output  status  determination  routine 

13  Less  significant  byte  of  starting  address  of 

output  driver  (write  1  byte  only) 

14  More  significant  byte  of  starting  address  of 

output  driver  (write  1  byte  only) 

15  Less  significant  byte  of  starting  address  of 

output  driver  (N  bytes  or  1  line) 

16  More  significant  byte  of  starting  address  of 

output  driver  (N  bytes  or  1  line) 

If  an  operation  is  irrelevant  or  undefined  (such  as  output 
status  determination  for  a  keyboard  or  input  driver  for  a 
printer),  the  corresponding  starting  address  in  the  device 
table  is  0. 
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Status  Values 


Value  Description 

0  No  errors 

1  Bad  device  number  (no  such  device) 

2  Bad  operation  number  (no  such  operation 

or  invalid  operation) 

3  Input  data  available  or  output  device  ready 
254       Buffer  too  small  for  use  by  CP/  M  BDOS 

function  10  (Read  Console  Buffer).  This 
function  requires  2  bytes  for  the  buffer 
length  and  character  count. 


Title  I/O  Device  Table  Handler 

Narnei  lOHDLR 


Purposes  Perform  I/O  in  a  device-independent  manner. 

This  can  be  done  only  by  accessing  all 
devices  in  the  same  way  using  an  I/O  Control 
Block  (lOCB)  and  a  device  table.  The  routines 
here  allow  the  following  operations: 


Operation  number  Description 


0  Initialize  device 

1  Determine  input  status 

2  Read  1  byte 

3  ReadNbytes 

4  Determine  output  status 

5  Write  1  byte 

6  Write  N  bytes 


Other  operations  that  could  be  included  are 
Open,  Close,  Delete,  Rename,  and  Append,  which 
would  support  devices  such  as  floppy  disks. 


fit  lOCB  is  an  array  of   the  following  form: 


lOCB  +  0  =  Device  number 
lOCB  +  1  =  Operation  number 
lOCB  +  2  =  Status 

lOCB  +  3  =  Low  byte  of  buffer  address 
lOCB  +  4  =  High  byte  of  buffer  address 
lOCB  +  5  =  Low  byte  of  buffer  length 
lOCB  +  6  =  High  byte  of  buffer  length 
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The  device  table  is  implemented  as  a  linked 
list.  Two  routines  maintain  the  list:  INITDL, 
which  initializes  the  device  list  to  empty,  and 
ADDDL,  which  adds  a  device  to  the  list. 
A  device  table  entry  has  the  following  form: 


Low  byte  of  link  field 
High  byte  of  link  field 
Device  number 

Low  byte  of  device  initialization 
High  byte  of  device  initialization 
Low  byte  of  input  status  routine 
High  byte  of  input  status  routine 
Low  byte  of  input   1  byte  routine 
High  byte  of  input   1  byte  routine 
Low  byte  of  input  N  bytes  routine 
High  byte  of  input  N  bytes  routine 
Low  byte  of  output  status  routine 
High  byte  of  output  status  routine 
Low  byte  of  output   1  byte  routine 
High  byte  of  output  1  byte  routine 
Low  byte  of  output  N  bytes  routine 
High  byte  of  output  N  bytes  routine 


DVTBL 

+ 

0 

DVTBL 

+ 

1 

DVTBL 

+ 

2 

DVTBL 

+ 

3 

DVTBL 

+ 

4 

DVTBL 

+ 

5 

DVTBL 

+ 

6 

DVTBL 

+ 

7 

DVTBL 

+ 

8 

DVTBL 

+ 

9 

DVTBL 

+ 

10 

DVTBL 

+ 

11 

DVTBL 

+ 

12 

DVTBL 

+ 

13 

DVTBL 

+ 

14 

DVTBL 

+ 

15 

DVTBL 

+ 

16 

Entry: 


Register  IX  =  Base  address  of  lOCB 
Register  A  =  For  write  1  byte,   contains  the 
data  (no  buffer  is  used) 


Exit : 


Register  A  =  Copy  of  the  lOCB  status  byte 
Except  contains  the  data  for 
read  1  byte  (no  buffer  is  used) 

Status  byte  of   lOCE  is  0  if  the  operation  was 

completed  successfully?  otherwise,   it  contains 

the  error  number. 


Status  value 
0 
1 

2 
3 

254 


Registers  used:  AF,BC, DE, HL , IX 


Descr  ipt  ion 

No  errors 

Bad  device  number 

Bad  operation  number 

Input  data  available  or  output 

device  ready 
Buffer  too  small  for  CP/M  BDOS 

function  10  (Read  Console 

Buffer) 


Times 


270  cycles  minimum  plus  90  cycles  for  each 
device  in  the  list  which  is  not  the  requested 
device 


Sizes 


Program  89  bytes 
Data  3  bytes 
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TARI  F   P(3\  lATF'^i 

1  HUL.C.    Cw'^M  1  CO 

lOCBDN 

EQU 

0 

lOCB  DEVICE  NUMBER 

lOCBOP 

EQU 

1 

lOCB  OPERATION  NUMBER 

IOC;BST 

EQU 

2 

lOCB  STATUS 

lOCBBA 

EQU 

3 

lOCB  BUFFER  ADDRESS 

lOCBBL 

EQU 

5 

lOCB  BUFFER  LENGTH 

DTLNK 

EQU 

0 

DEVICE  TABLE  LINK  FIELD 

DTDN 

EQU 

2 

DEVICE  TABLE  DEVICE  NUMBER 

DTSR 

EQU 

3 

■BEGINNING  OF  DEVICE  TABLE  SUBROUTINES 

; OPERATION  NUMBERS 


NUMOP 

EQU 

7 

; NUMBER  OF  OPERATIONS 

INIT 

EQU 

0 

; INITIALIZATION 

I  STAT 

EQU 

1 

; INPUT  STATUS 

RIBYTE 

EQU 

2 

jREAD  1  BYTE 

RNBYTE 

EQU 

3 

SREAD  N  BYTES 

OSTAT 

EQU 

4 

J  OUTPUT  STATUS 

WIBYTE 

EQU 

5 

; WRITE  1  BYTE 

WNBYTE 

EQU 

6 

! WRITE  N  BYTES 

; STATUS 

VALUES 

NOERR 

EQU 

0 

DEVERR 

EQU 

1 

OPERR 

EQU 

o 

DEVRDY 

EQU 

3 

BUFERR 

EQU 

254 

J  NO  ERRORS 
jBAD  DEVICE  NUMBER 
;BAD  OPERATION  NUMBER 
{INPUT  DATA  AVAILABLE 
; BUFFER  TOO  SMALL  FOR 


OR  OUTPUT  DEVICE  READY 
BDOS  READ  CONSOLE  BUFFER 


lOHDLRs 


LD 


(BDATA),A 


J  SAVE  DATA  BYTE  FOR  WRITE  1  BYTE 


J  INITIALIZE  STATUS  BYTE  TO  ZERO  (NO  ERRORS) 

LD  (IX  +  IOCBST,l,  NOERR  j  STATUS  =  NO  ERRORS 

; CHECK  THAT  OPERATION  IS  VALID 

LD  A, (IX+IOCBOP)       ;GET  OPERATION  NUMBER  FROM  lOCB 

LD  B,A  ;SAVE  OPERATION  NUMBER 

CP  NUMOP  ;IS  OPERATION  NUMBER  WITHIN  LIMIT? 

JR  NCBADOP  I  JUMP  IF  OPERATION  NUMBER  TOO  LARGE 


SEARCH  DEVICE  LIST  FOR  THIS  DEVICE 

C  =  lOCB  DEVICE  NUMBER 

DE  =  POINTER  TO  DEVICE  LIST 
LD  C, (IX+IOCEDN)       ;C  =  lOCB  DEVICE  NUMBER 

LD  DE,(DVLST)  ! DE  =  FIRST  ENTRY  IN  DEVICE  LIST 


jDE  =  POINTER  TO  DEVICE  LIST 

sB  =  OPERATION  NUMBER 

;C  =  REQUESTED  DEVICE  NUMBER 


SRCHLP: 


; CHECK  IF  AT  END  OF  DEVICE  LIST  (LINK  FIELD  =  0000) 
LD  A,D  J  TEST  LINK  FIELD 

OR  E 

JR  Z.BADDN  5  BRANCH  IF  NO  MORE  DEVICE  ENTRIES 
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J  CHECK  IF  CURRENT  ENTRY  IS  DEVICE  IN  lOCB 

LD  HL,DTDN  ; POINT  TO  DEVICE  NUMEiER  IN  ENTRY 

ADD  HL,DE 

LD  A, (HL) 

CP  C  {COMPARE  TO  REQUESTED  DEVICE 

JR  Z, FOUND  ; BRANCH  IF  DEVICE  FOUND 

! DEVICE  NOT  FOUND,   SO  ADVANCE  TO  NEXT  DEVICE 
!   TABLE  ENTRY  THROUGH  LINK  FIELD 
;  MAKE  CURRENT  DEVICE  =  LINK 

EX  DE,HL  {POINT  TO  LINK  FIELD  (FIRST  WORDi 

LD  E,(HL)  jGET  LOW  BYTE  OF  LINK 

INC  HL 

LD  D,CHL)  ;GET  HIGH  BYTE  OF  LINK 

JR  SRCHLP  J  CHECK  NEXT  ENTRY  IN  DEVICE  TABLE 


FOUND! 


! FOUND  DEVICE,   SO  VECTOR  TO  APPROPRIATE  ROUTINE  IF  ANY 
;DE  =  ADDRESS  OF  DEVICE  TABLE  ENTRY 
jB  =  OPERATION  NUMBER 

5 GET  ROUTINE  ADDRESS  (ZERO  INDICATES  INVALID  OPERATION) 


LD 

LD 

ADD 

LD 

ADD 

ADD 

LD 

INC 

LD 

LD 

OR 

JR 

LD 

JP 


L,B 

H,0 
HL,HL 

BCDTSR 
HL,  BC 

HL,  DE 
A, CHL) 
HL 

H, (HL) 

L,A 

H 

Z , BADOP 
A, (BDATA) 
(HL) 


;HL  =  16-BIT  OPERATION  NUMBER 

{MULTIPLY  BY  2  FOR  ADDRESS  ENTRIES 

HL  =  OFFSET  TO  SUBROUTINE  IN 

DEVICE  TABLE  ENTRY 
HL  =  ADDRESS  OF  SUBROUTINE 
GET  SUBROUTINE'S  STARTING  ADDRESS 


; IS  STARTING  ADDRES 


ZERO? 


;YES,   JUMP  (OPERATION  INVALID) 
;GET  DATA  BYTE  FOR  WRITE  1  BYTE 
;GOTO  SUBROUTINE 


BADDN: 


LD 
JR 


A,DEVERR 
EREXIT 


i ERROR  CODE 


NO  SUCH  DEVICE 


BADOP: 


LD 


A,OPERR 


I  ERROR  CODE 


NO  SUCH  OPERATION 


EREXIT: 


LD 
RET 


(IX+IOCEST) , A 


;SET  STATUS  BYTE  IN  lOCB 


{ROUTINE:  INITDL 

{PURPOSE:  INITIALIZE  DEVICE  LIST  TO  EMPTY 
{ENTRY:  NONE 

{EXIT:     DEVICE  LIST  SET  TO  NO  ITEMS 
{REGISTERS  USED:  HL 
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INITDL: 


! INITIALIZE  DEVICE  LIST  HEADER  TO  0  TO  INDICATE  NO  DEVICES 
LD  HL,0  ; HEADER  =  0  (EMPTY  LIST) 

LD  (.DVLST),HL 
RET 


ADDDL: 


J  ROUTINE:  ADDDL 

! PURPOSE:   ADD  DEVICE  TO  DEVICE  LIST 

; ENTRY:   REGISTER  HL  =  ADDRESS  OF  DEVICE  TABLE  ENTRY 
5  EXIT:     DEVICE  ADDED  TO  DEVICE  LIST 
; REGISTERS  USED:  DE 


LD 

LD 

INC 

LD 

DEC 

LD 

RET 


DE, (DVLST) 

(HL),E 

HL 

(HL) , D 
HL 

( DVLST ),HL 


;GET  CURRENT  HEAD  OF  DEVICE  LIST 
; STORE  CURRENT  HEAD  OF  DEVICE  LIST 
;    INTO  LINK  FIELD  OF  NEW  DEVICE 


;MAKE  DVLST  POINT  AT  NEW  DEVICE 


jDATA  SECTION 
DVLST:     DS  2 
EDATA:     DS  1 


; DEVICE  LIST  HEADER 

;DATA  BYTE  FOR  WRITE  1  BYTE 


SAMPLE  EXECUTION! 

This  test  routine  sets  up  the  CP/M  console  as 
device  1  and  the  CP/M  printer  as  device  2. 
The  routine  then  reads  a  line  from  the  console  and 
echoes  it  to  the  console  and  the  printer. 


! CHARACTER  EQUATES 

CR 

EQU 

ODH 

; CARRIAGE  RETURN  CHARACTER 

LF 

EQU 

OAH 

;LINE  FEED  CHARACTER 

;  CP/M 

EQUATES 

EDOS 

EQU 

0005H 

! ADDRESS  OF  CP/M  EDOS  ENTRY  POINT 

CINP 

EQU 

1 

jBDOS  CONSOLE  INPUT  FUNCTION 

COUTP 

EQU 

;EDOS  CONSOLE  OUTPUT  FUNCTION 

LOUTP 

EQU 

5 

;EDOS  LIST  OUTPUT  FUNCTION 

RCEUF 

EQU 

10 

;BDOS  READ  CONSOLE  BUFFER  FUNCTION 

CSTAT 

EQU 

11 

5 EDOS  CONSOLE  STATUS  FUNCTION 

SCIOD: 

; INITIALIZE  DEVICE 

LIST,   POINT  TO  lOCB 

CALL 

INI IDL 

! INITIALIZE  DEVICE  LIST 

LD 

IX, lOCE 

; POINT  TO  IOCS 

;3ET  UP  CONSOLE  AS  DEVICE  1  AND  INITIALIZE  IT 
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LD  HL,CONDV 

CALL  ADDDL 

LD  (IX+IOCEOP) , INIT 

LD  <IX+IOCEDN), 1 

CALL  lOHDLR 


; POINT  TO  CONSOLE  DEVICE  ENTRY 
sADD  CONSOLE  TO  DEVICE  LIST 

{INITIALIZE  OPERATION 
; DEVICE  NUMBER  =  1 
! INITIALIZE  CONSOLE 


;SET  UP  PRINTER  AS  DEVICE  2  AND  INITIALIZE  IT 


TSTLP: 


LD  HL,PRTDV 

CALL  ADDDL 

LD  (IX+IOCBOP) , INIT 

LD  (IX+I0CBDN),2 

CALL  lOHDLR 


POINT  TO  PRINTER  DEVICE  ENTRY 
ADD  PRINTER  TO  DEVICE  LIST 
(INITIALIZE  OPERATION 

; DEVICE  NUMBER  =  2 

! INITIALIZE  PRINTER 


;LOOP  READING  LINES  FROM  CONSOLE,  AND  ECHOING  THFM  TO 
!   CONSOLE  AND  PRINTER  UNTIL  A  BLANK  LINE  IS  ENTERED 

LD  (IX+IOCBDN) , 1       jDEVICE  NUMBER  =  1  (CONSOLE) 

LD  (IX+IOCBOP) ,RNBYTE  ; OPERATION  IS  READ  N  BYTES 

LD  HL , LENBUF 

LD  (IOCB+IOCBBL),HL  ;SET  BUFFER  LENGTH  TO  LENBUF 

CALL  lOHDLR  ; READ  A  LINE 


ECHO: 


{OUTPUT  LINE  FEED  TO  CONSOLE 

LD  (IX+I0CB0P),W1BYTE  {OPERATION  IS  WRITE  1  BYTE 

LD  A,LF  {CHARACTER  IS  LINE  FEED 

CALL         lOHDLR  {WRITE  1  BYTE  (LINE  FEED) 

{ECHO  LINE  TO  DEVICE  1  AND  2 
LD  A,  1 

CALL        ECHO  {ECHO  LINE  TO  DEVICE  1 

LD  A,  2 

CALL        ECHO  {ECHO  LINE  TO  DEVICE  2 

{STOP  IF  LINE  LENGTH  IS  0 

LD  HL, (lOCB+IOCBBL)    {GET  LINE  LENGTH 


LD 
OR 
JR 

JR 


A,H 

L 

NZ, TSTLP 
SCIOD 


{TEST  LINE  LENGTH 

{CONTINUE  IF  LENGTH  NOT  ZERO 

{AGAIN 


{ OUTPUT 
LD 


LD 
CALL 


LINE 

(IX+IOCBDN) , A       {SET  DEVICE  NUMBER  IN  lOCB 

{NOTE  THAT  ECHO  WILL  SEND  A  LINE 
{   TO  ANY  DEVICE.     THE  DEVICE  NUMBER 
{    IS  IN  THE  ACCUMULATOR 

( IX+IOCBOP), WNBYTE  {SET  OPERATION  TO  WRITE  N  BYTES 

lOHDLR  {WRITE  N  BYTES 


{OUTPUT  CARRIAGE  RETURN/LINE  FEED 

LD  ( IX+IOCBOP), WIBYTE  {SET  OPERATION  TO  WRITE  1  BYTE 

LD  A,CR  {CHARACTER  IS  CARRIAGE  RETURN 

CALL         lOHDLR  {WRITE  1  BYTE 

LD  A,LF  {CHARACTER  IS  LINE  FEED 

CALL         lOHDLR  {WRITE  1  BYTE 
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RET 


lOCBs 


LENBUF 
BUFFER: 


CONDV: 


PRTDV: 


! lOCB  FOR  PERFORMING 

I/O 

OS 

1 

; DEVICE  NUMBER 

DS 

1 

; OPERATION  NUMBER 

DS 

1 

; STATUS 

DW 

BUFFER 

; BUFFER  ADDRESS 

DS 

2 

! BUFFER  LENGTH 

; BUFFER 

EQU 

127 

DS 

LENBUF 

; DEVICE 

TABLE  ENTRIES 

DUI 

0 

sLINK  FIELD 

DB 

1 

; DEVICE  1 

DW 

CINIT 

; CONSOLE  INITIALIZE 

DW 

CI STAT 

; CONSOLE  INPUT  STATUS 

DUI 

CIN 

; CONSOLE  INPUT  1  BYTE 

DW 

CINN 

; CONSOLE  INPUT  N  BYTES 

DW 

COSTAT 

(CONSOLE  OUTPUT  STATUS 

DW 

COUT 

; CONSOLE  OUTPUT  1  BYTE 

DW 

COUTN 

; CONSOLE  OUTPUT  N  BYTES 

DW 

0 

jLINK  FIELD 

DB 

2 

; DEVICE  2 

DW 

PINIT 

jPRINTER  INITIALIZE 

DW 

0 

;N0  PRINTER  INPUT  STATUS 

DW 

0 

SNO  PRINTER  INPUT  1  BYTE 

DW 

0 

!N0  PRINTER  INPUT  N  BYTES 

DW 

POSTAT 

! PRINTER  OUTPUT  STATUS 

DW 

POUT 

; PRINTER  OUTPUT  1  BYTE 

DW 

POUTN 

! PRINTER  OUTPUT  N  BYTES 

J  CONSOLE  I/O  ROUTINES 


! CONSOLE  INITIALIZE 

CINIT: 


SUB 

A 

! STATUS  =  NO  ERRORS 

RET 

;N0  INITIALIZATION  NECESSARY 

; CONSOLE  INPUT  STATUS 

PUSH 

IX 

;SAVE  lOCE  ADDRESS 

LD 

CCSTAT 

jBDOS  CONSOLE  STATUS  FUNCTION 

CALL 

BDOS 

;GET  CONSOLE  STATUS 

POP 

IX 

; RESTORE  lOCB  ADDRESS 

OR 

A 

JR 

Z,CIS1 

;JUMP  IF  NOT  READY 

LD 

A, DEVRDY 

; INDICATE  CHARACTER  READY 

LD 

(IX+IOCBST), A 

! STORE  STATUS  AND  LEAVE  IT  IN  REGISTER  A 

RET 
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CIN: 


; CONSOLE  READ  1  BYTE 


PUSH 
LD 

CALL 

POP 

RET 


IX 

CCINP 

BDOS 

IX 


. SAVE  I X 

;BDOS  CONSOLE  INPUT  FUNCTION 
SREAD  1  BYTE  FROM  CONSOLE 
; RESTORE  IX 


; CONSOLE  READ  N  BYTES 


CINN: 


READ 
BDOS 


PUSH 

LD 

SUB 


JR 
LD 
RET 


USING  BDOS  READ  CONSOLE  BUFFER  FUNCTION 

CONSOLE  BUFFER  FUNCTION  USES  THE  FOLLOWING  BUFFER  FORMAT: 
0!   BUFFER  LENGTH  (MAXIMUM  NUMBER  OF  CHARACTERS) 
l!   NUMBER  OF  CHARACTERS  READ  (LINE  LENGTH) 
2  ON:   ACTUAL  CHARACTERS 

SAVE  BASE  ADDRESS  OF  lOCB 
GET  BUFFER  LENGTH 

BUFFER  MUST  EE  AT  LEAST  3  CHARACTERS 
TO  ALLOW  FOR  MAXIMUM  LENGTH  AND  COUNT 
USED  BY  BDOS  READ  CXiNSOLE  BUFFER 
NCCINNl  ;JUMP  IF  BUFFER  LONG  ENOUGH 

(IX  +  IOCBST),BU|i^ERR  }SET  ERROR  STATUS  -  BUFFER  TOO  SMALL 


LINE 
READ 
BYTE 
BYTE 
BYTES 
IX 


A, (IX+IOCBBL) 


INC 

A 

;ADD  ONE  BACK  TO  DETERMINE  HOW  MUCH 
;   SPACE  IS  AVAILABLE  IN  BUFFER  FOR 

LD 

E,  (IX  +  IOCBBA) 

;GET  BUFFER  ADDRESS  FROM  lOCB 

LD 

D, (IX+IOCBBA+1) 

PUSH 

DE 

;SAVE  BUFFER  ADDRESS 

LD 

(DE) ,A 

iiSET  MAXIMUM  LENGTH  IN  BUFFER 

LD 

CRCBUF 

■,BDOS  READ  CONSOLE  BUFFER  FUNCTION 

CALL 

BDOS 

;READ  BUFFER 

; RETURN  NUMBER  OF  CHARACTERS  READ  IN  THE  lOCE 


POP 

HL 

RESTORE  BUFFER  ADDRESS 

POP 

IX 

RESTORE  BASE  ADDRESS  OF  lOCB 

INC 

HL 

POINT  TO  NUMBER  OF  CHARACTERS  READ 

LD 

A, (HL) 

GET  NUMBER  OF  CHARACTERS  READ 

LD 

(IX+IOCBBL) , A 

SET  BUFFER  LENGTH  IN  lOCB 

LD 

(IX+I0CBBL+1),0 

WITH  UPPER  BYTE  =  0 

SMOVE  DATA  TO  FIRST  BYTE  OF  BUFFER 

; DROPPING  OVERHEAD  (BUFFER  LENGTH,   LINE  LENGTH) 

!   RETURNED  BY  CP/M.   LINE  LENGTH  IS  NOW  IN  THE  lOCB 

OR  A  ;TEST  LINE  LENGTH 

RET  Z  ; RETURN  IF  LENGTH  WAS  0 


LD 

C,  A 

;BC  =  NUMBER  OF  BYTES 

LD 

B,0 

LD 

D,H 

! POINT  TO  START  OF  BUFFER  +  1 

LD 

E,L 

INC 

HL 

;HL  =  SOURCE  =  FIRST  BYTE  OF  DATA 
t   2  BYTES  BEYOND  START 

DEC 

DE 

jDE  =  DESTINATION  (FIRST  BYTE  OF  BUFFER) 

LDIR 

;MOVE  DATA  DOWN  2  BYTES  IN  BUFFER 

SUE 

A 

; STATUS  =  NO  ERRORS 
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RET 


COSTAT: 


; CONSOLE  OUTPUT  STATUS 


LD 
RET 


A.DEVRDY 


; STATUS  =  ALWAYS  READY  TO  OUTPUT 


f CONSOLE  OUTPUT  1  BYTE 


COUT: 


PUSH 

LD 

LD 

CALL 
POP 
SUB 
RET 


IX 

CCOUTP 

E,A 

BOOS 

IX 

A 


I  SAVE  IX 

(BDOS  CONSOLE  OUTPUT  OPERATION 
:E  =  CHARACTER 
f OUTPUT  1  BYTE 
(RESTORE  IX 
(RETURN,   NO  ERRORS 


; CONSOLE  OUTPUT  N  BYTES 

COUTN: 

LD  HL,COUT  !HL  POINTS  TO  OUTPUT  CHARACTER  ROUTINE 

CALL        OUTN  J  CALL  OUTPUT  N  CHARACTERS 

SUB  A  ! STATUS  =  NO  ERRORS 

RET 


J  PR INTER  ROUTINES 


SPRINTER  INITIALIZE 

PINIT: 

SOB  A  ; NOTHING  TO  DO,   RETURN  NO  ERRORS 

RET 

; PR INTER  OUTPUT  STATUS 

POST AT! 

LD  A,DEVRDY  ; STATUS  =  ALWAYS  READY  TO  OUTPUT 

RET 


SPRINTER  OUTPUT  1  BYTE 

POUT: 

PUSH  I X 

LD  CLOUTP 

LD  E,A 

CALL  BDOS 

POP  I X 

SUB  A 

RET 


;SAVE  IX 

jBDOS  LIST  OUTPUT  FUNCTION 

fE  =  CHARACTER 

; OUTPUT  TO  PRINTER 

! RESTORE  IX 

! STATUS  =  NO  ERRORS 


5 PRINTER  OUTPUT  N  BYTES 

POUTN: 

LD  ML, POUT  ;HL  =  ADDRESS  OF  OUTPUT  ROUTINE 

CALL        OUTN  ; OUTPUT  N  CHARACTERS 

SUB  A  sNO  ERRORS 

RET 
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; ROUTINE!  OUTN 

; PURPOSE!   OUTPUT  N  CHARACTERS 

; ENTRY!  REGISTER  HL  =  CHARACTER  OUTPUT  SUBROUTINE  ADDRESS 
;  REGISTER  IX  =  BASE  ADDRESS  OF  AN  lOCB 

jEXIT:     DATA  OUTPUT 
jREGISTERS  USED:  AF,BC,HL 

OUTN! 

; STORE  ADDRESS  OF  CHARACTER  OUTPUT  SUBROUTINE 
LD  (COSR,V,HL  jSAVE  ADDRESS 

;GET  NUMBER  OF  BYTES,   EXIT  IF  LENGTH  IS  0 
;   EC  =  NUMBER  OF  BYTES 

LD  C,  CIX-HOCEBL)       ?BC  =  BUFFER  LENGTH 

LD  B, (IX+IOCBBL+1) 

LD  A,B  ;TEST  BUFFER  LENGTH 

OR  C 

RET  Z  ! EXIT  IF  BUFFER  EMPTY 

;GET  OUTPUT  BUFFER  ADDRESS  FROM  lOCB 
;   HL  =  BUFFER  ADDRESS 

LD  L,  (.  IX  +  IOCBBA)       ;  HL  =  BUFFER  ADDRESS 

LD  H, tIX+IOCEBA+1) 

OUTLPi 


LD 

A, (HL) 

PUSH 

HL 

jSAVE  BUFFER  POINTER,  COUNT 

PUSH 

BC 

CALL 

DOSUB 

! OUTPUT  CHARACTER 

POP 

BC 

5  RESTORE  COUNT,   BUFFER  POINTER 

POP 

HL 

INC 

HL 

; POINT  TO  NEXT  CHARACTER 

DEC 

BC 

{DECREMENT  AND  TEST  COUNT 

LD 

A,B 

OR 

C 

JR 

NZ , OUTLP 

! CONTINUE  UNTIL  COUNT  =  0 

RET 

LD 

HL, (COSR) 

JP 

(HL) 

jGOTO  ROUTINE 

DW 

0 

! ADDRESS  OF  CHARACTER  OUTPUT  SUBROUTINE 

END 

Initialize  I/O  Ports  (PORTS) 


10E 


Initializes  a  set  of  I/O  ports  from  an  array  of 
port  device  addresses  and  data  values.  Examples 
are  given  of  initializing  the  common  Z80  program- 
mable I/O  devices:  CTC,  PIO,  and  SIO. 

This  subroutine  is  a  generalized  method  for 
initializing  I/O  sections.  The  initialization  may 
involve  data  ports,  data  direction  registers  that 
determine  whether  bits  are  inputs  or  outputs, 
control  or  command  registers  that  determine  the 
operating  modes  of  programmable  devices,  count- 
ers (in  timers),  priority  registers,  and  other  ex- 
ternal registers  or  storage  locations. 

Tasks  the  user  may  perform  with  this  routine 
include: 

1 .  Assigning  bidirectional  I /  O  lines  as  inputs 
or  outputs 

2.  Initializing  output  ports 

3.  Enabling  or  disabling  interrupts  from 
peripheral  chips 

4.  Determining  operating  modes,  such  as 
whether  inputs  are  latched,  whether  strobes 
are  produced,  how  priorities  are  assigned, 
whether  timers  operate  continuously  or  only  on 
demand,  etc. 

5.  Loading  starting  values  into  timers  and 
counters 

6.  Selecting  bit  rates  for  communications 

7.  Clearing  or  resetting  devices  that  are  not 
tied  to  the  overall  system  reset  line 

8.  Initializing  priority  registers  or  assigning 


Enfry  Conditions 

Base  address  of  initialization  array  in  HL 


Registois  Used:  AF,  BC,  DE,  HL 

Execution  Time:  22  cycles  overhead  plus  46  +  21  *  N 
cycles  for  each  port,  where  N  is  the  number  of  bytes 
sent. 

Program  Size:  11  bytes  plus  the  size  of  the  table  (at 
least  3  bytes  per  port  plus  1  byte  for  a  terminator) 

Data  Memory  Required:  None 

initial  priorities  to  interrupts  or  other  opera- 
tions 

9.  Initializing  vectors  used  in  servicing 
interrupts,  DMA  requests,  and  other  inputs. 

Procedure:  For  each  port,  the  program  obtains 
the  number  of  bytes  to  be  sent  and  the  device 
address.  It  then  sends  the  data  values  to  the  port 
using  a  repeated  block  output  instruction.  This 
approach  does  not  depend  on  the  number  or 
type  of  devices  in  the  I/O  section.  The  user  may 
add  or  delete  devices  or  change  the  initialization 
by  changing  the  array  rather  than  the  program. 
Each  entry  in  the  array  consists  of  a  series  of 
byte-length  elements  in  the  following  order: 

1.  Number  of  bytes  to  be  sent  to  the  port 

2.  8-bit  device  address  for  the  port 

3.  Data  bytes  in  sequential  order. 

The  array  ends  with  a  terminator  that  has  0  in 
its  first  byte. 

Note  that  an  entry  may  consist  of  an  arbitrary 
number  of  bytes.  The  first  element  determines 
how  many  bytes  are  sent  to  the  device  address  in 
the  second  element.  The  subsequent  elements 
contain  the  data  values.  The  terminator  need 
consist  only  of  a  single  0  byte. 


Exit  Conditions 

All  data  values  sent  to  appropriate  ports 
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Example 

1.     Data:     Array  elements  are  Result:     Three  values  sent  to  port  I's  device  address 

3  (number  of  bytes  for  port  1)  Two  values  sent  to  port  2's  device  address 
Port  1  device  address,  first  value,  second  Four  values  sent  to  port  3's  device  address 
value,  third  value 

2  (number  of  bytes  for  port  2) 

Port  2  device  address,  first  value,  second 
value 

4  (number  of  bytes  for  port  3) 

Port  3  device  address,  first  value,  second 
value,  third  value,  fourth  value 
0  (terminator) 


Title  Initialize  I/O  Ports 

Name:  I PORTS 


Purpose:  Initialize  I/O  ports  from  an  array  of  port 

addresses  and  values 

Entry:  Register  pair  HL  =  Base  address  of  a.rray 

The  array  consists  of  byte-length  elements 
in  the  following  order:   number  of  bytes  to 
be  sent  to  the  port,  port  device  address,  data 
values  for  the  port.   This  sequence  is  repeated 
for  any  number  of  ports.  The  array  is  terminated 
by  an  entry  with  0  in  the     number  of  bytes. 
array+0  =  Number  of  bytes  for  this  port 
array+1  =  Port  device  address 
array+2  =  First  value  for  this  port 


array+2+(N-l =  Last  value  for  this  port 


Exit:  None 
Registers  used:   AF , EC , DE , HL 

Time;  22  cycles  overhead  plus  46  +  (N  «  21)  cycles  for 

each  port,  where  N  is  the  number  of  bytes  sent 
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Program  11  bytes 


I PORTS 


;GET  NUHBER  OF  DATA  BYTES  TO  SEND  TO  CURRENT  PORT 

jEXIT  IF  NUMBER  OF  BYTES  IS  0,    INDICATING  TERMINATOR 
LD  A, (HL)  jGET  NUMBER  OF  BYTES 

OR  A  J  TEST  FOR  ZERO  (TERMINATOR) 

RET  Z  ; RETURN  IF  NUMBER  OF  BYTES  =  0 

LD  B,  A 

INC  HL  ; POINT  TO  PORT  ADDRESS  (NEXT  EYTE.1 

;C  =  PORT  ADDRESS 

fHL  =  ADDRESS  OF  DATA  TO  OUTPUT 

LD  C,  (.HL)  ;GET  PORT  ADDRESS 

INC  HL  ; POINT  TO  FIRST  DATA  VALUE  (NEXT  BYTE) 

; OUTPUT  DATA  AND  CONTINUE  TO  NEXT  PORT 

OTIR  SSEND  DATA  VALUES  TO  PORT 

JR  I PORTS  ; CONTINUE  TO  NEXT  PORT  ENTRY 


SAMPLE  EXECUTION: 


? INITIALIZE 

;     ZSO  CTC  (PROGRAMMABLE  TIMER/COUNTER) 

;     ZSO  SIO  (PROGRAMMABLE  SERIAL  INTERFACE) 

;     ZSO  PIO  (PROGRAMMABLE  PARALLEL  INTERFACE) 


! ARBITRARY  PORT  ADDRESSES 
;     CTC  PORT  ASSIGNMENTS 


CTCO 

EQU 

70H 

!  CTC 

CHANNEL 

0 

CTCl 

EQU 

71H 

;CTC 

CHANNEL 

1 

CTC2 

EQU 

72H 

;  CTC 

CHANNEL 

CTC3 

EQU 

73H 

;CTC 

CHANNEL 

3 

;     SIO  PORT  ASSIGNMENTS 
SIOCAD     EQU  SOH  ;SIO  CHANNEL  A  DATA 

SIOCBD     EQU  81H  ;SIO  CHANNEL  B  DATA 

SIOCAS     EQU  82H  ;SIO  CHANNEL  A  COMMANDS/STATUS 

SIOCBS     EQU  83H  ;SIO  CHANNEL  B  COMMANDS/STATUS 


;     PIO  PORT  ASSIGNMENTS 
PI GAD      EQU  OFOH  ;PIO  PORT  A  DATA 

PI ODD      EQU  OFIH  ;PIO  PORT  B  DATA 

PIOAC      EQU  0F2H  jPIO  PORT  A  CONTROL 

PIOBC      EQU  0F3H  jPIO  PORT  B  CONTROL 


;      INTERRUPT  VECTORS 
SIOIV       EQU  OCOH  5 SIO  INTERRUPT  VECTOR 
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PIOIVA  EQU 
PIOIVB  EQU 


SClOEs 


LD 

CALL 
JR 


ODOH 
0D2H 


HL.PINIT 
I PORTS 

SClOE 


;PIO  PORT  A  INTERRUPT  VECTOR 
;PIO  PORT  B  INTERRUPT  VECTOR 


; POINT  TO  INITIALIZATION  ARRAY 
; INITIALIZE  PORTS 


PINIT: 


INITIALIZE  Z80  CTC  CHANNEL  0 

;  RESET  CHANNEL 

!  OPERATE  CHANNEL  IN  COUNTER  MODE,   DECREMENTING  DOWN  COUNTER 

J  AFTER  EACH  POSITIVE  (RISING.)  EDGE  ON  CLOCK  INPUT. 

;  SET  INITIAL  TIME  CONSTANT  TO  26  CLOCK  CYCLES. 

;  NOTE:   CTC  RELOADS  TIME  CONSTANT  REGISTER  INTO  DOWN  COUNTER 

5  AUTOMATICALLY  AFTER  EACH  COUNTDOWN  TO  0. 

?         THIS  INITIALIZATION  PRODUCES  AN  SIO  CLOCK  FOR  9600  BAUD 
S  TRANSMISSION. 

J         IT  ASSUMES  4  MHZ  CLOCK  INPUT  TO  PIN  23,   SO  A  COUNT  OF 
;  4,000,000/a65<9600)     =  26  WILLL  GENERATE  A  153,600 

(16K9600)  HZ  SQUARE  WAVE  ON  PIN  7  FOR  SIO  PINS  13  AND  14. 


DB 
DB 
DB 


SIO  IS  OPERATING  IN  DIVIDE  BY  16  MODE. 

; OUTPUT  TWO  BYTES 

[DESTINATION  IS  CHANNEL  CONTROL  REGISTER 


CTCO 
OlOlOlllB 


DB 


26 


BIT 
BIT 
BIT 
BIT 
BIT 

BIT 
BIT 
BIT 


1    (WRITE  CHANNEL  CONTROL  WORD) 

1   (RESET  CHANNEL) 

1   (TIME  CONSTANT  FOLLOWS) 

0  (NOT  USED  IN  COUNTER  MODE) 

1  (DECREMENT  COUNTER  ON 

POSITIVE  CLOCK  EDGE) 

0  (NOT  USED  IN  COUNTER  MODE) 

1  (COUNTER  MODE) 
0  (NO  INTERRUPT) 


TIMER  COUNTDOWN  VALUE  FOR  9600  BAUD 


INITIALIZE  Z80  SIO  CHANNEL  A  FOR  ASYNCHRONOUS  SERIAL  I/n. 
SET  INTERRUPT  VECTOR   (ALWAYS  IN  CHANNEL  B)   TO  SIO IV 
NO  PARITY,    2  STOP  BITS,    16  TIMES  CLOCK. 

RECEIVE  AND  TRANSMIT  8  BITS/CHAR,    NO  SPECIAL  CONTROLS. 
ENABLE  TRANSMIT  INTERRUPT,   RECEIVE  INTERRUPTS  ON  ALL  CHARS; 
PARITY  OR  STATUS  DOES  NOT  AFFECT  INTERRUPT  VECTORS. 


!  SET  INTERRUPT  VECTOR 

DB  2  J  OUTPUT  TWO  BYTES 

DB  SIOCBS  ; DESTINATION  IS  COMMAND  REGISTER  B 

DB  0000001 OB  ; SELECT  WRITE  REGISTER  2 

DB  SIOIV  jSET  INTERRUPT  VECTOR  FOR  SIO 

;  INITIALIZE  CHANNEL  A 

DB  9  ; OUTPUT  NINE  BYTES 

DB  SI OCAS  ; DESTINATION  IS  COMMAND  REGISTER  A 
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!  RESET  THE  CHANNEL 

DB  OOOllOOOB  ; SELECT  WRITE  REGISTER  0 

jBITS  2,1,0  =  0  (WRITE  REGISTER  0) 
;BITS  5,4,3  =  Oil   (CHANNEL  RESET) 
;BITS  7,6  =  0  (DO  NOT  CARE) 

;  INITIALIZE  BAUD  RATE  CONTROL 

!  NO  PARITY,   2  STOP  BITS,    16  TIMES  CLOCK 

DB  000001 DOB  ; SELECT  WRITE  REGISTER  4 

DB  01001 lOOB  JBIT  0  =  0  (NO  PARITY) 

;BIT  1  =  0  (DON'T  CARE) 
SEITS  3,2  =11   (2  STOP  BITS) 
;BITS  5,4  =  00  (DON'T  CARE) 
jBITS  7,6  =  01    (16  TIMES  CLOCK) 

;  INITIALIZE  RECEIVE  CONTROL 

;  8  BITS  PER  CHARACTER,   ENABLE  RECEIVER,   NO  AUTO  ENABLE 

DB  0000001  IB  ; SELECT  WRITE  REGISTER  3 

DB  lUOOOOlB  J  BIT  0  =  1    (RECEIVE  ENABLE) 

;BITS  4,3,2,1  =  0  (DON'T  CARE) 

•,B1J  5  =  0  (NO  AUTO  ENABLE) 

;BIT  7,6  =  11   (RECEIVE  8  BITS/CHAR) 

!  INITIALIZE  TRANSMIT  CONTROL 

!  8  BITS  PER  CHARACTER,   ENABLE  TRANSMIT,   NO  BREAK  OR  CRC 

DB  0000010 IE  ; SELECT  WRITE  REGISTER  5 

DB  inOlOlOB  ;BIT  0  =  0  (NO  CRC  ON  TRANSMIT) 

!BIT   1   =   1    (REQUEST  TO  SEND) 
;BIT  2  =  0   (DON  T  CARE) 
■.BIT  3  =  1    (TRANSMIT  ENABLE) 
;BIT  4  =  0  (DO  NOT  SEND  BREAK) 
sBITS  6,5  =  11   (TRANSMIT  8  BITS/CHAR) 
(BIT  7  =  1    (DATA  TERMINAL  READY) 


DB 


DB 


INITIALIZE  INTERRUPT  CONTROL 
RESET  INTERRUPTS  FIRST 

ENABLE  TRANSMIT  INTERRUPT,   RECEIVE  INTERRUPTS  ON  ALL  CHARS 
NEITHER  STATUS  NOR  PARITY  ERRORS  AFFECT  INTERRUPT  VECTOR 
THE  WAIT/READY  OUTPUT  LINE 
SELECT  WRITE  REGISTER  1  AND 

RESET  EXTERNAL/STATUS  INTERRUPTS 
BIT  0  =  0  (NO  EXTERNAL  INTERRUPTS) 
BIT  1  =  1   (ENABLE  TRANSMIT  INTERRUPT) 
BIT  2  =  0  (STATUS  DOES  NOT  AFFECT 
VECTOR) 

BITS  4,3  =  11   (RECEIVE  INTERRUPTS  ON 

ALL  CHARS,   PARITY  DOES  NOT 
AFFECT  VECTOR) 
BITS  7,6,5  =  000  (NO  WAIT/READY 
FUNCTION) 


DO  NOT  CONTROL 
000 1 000 1 B 

0001 101 OB 


;  TRANSMIT  A  NULL  BYTE  TO  START  INTERRUPT  PROCESSING 

DB  1  ! OUTPUT  1  BYTE 

DB  SIOCAD  ; DESTINATION  IS  CHANNEL  A  DATA 

DB  0  jNULL  CHARACTER  (00  HEX) 
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INITIALIZE  Z80  PIO 

PORT  A  -  INPUT  PORT  WITH  INTERRUPT  ENABLED 

PORT  E  -  CONTROL  PORT  WITH  INTERRUPT  ENABLED.     AN  INTERRUPT  IS 
GENERATED  IF  ANY  OF  BITS  0,   4,   OR  7  BECOME  1 


INITIALIZE  PIO  PORT  A 


DB 
DE 
DB 
DB 


DB 


DB 
DB 
DB 
DE 


DB 


PIOAC 
PIOIVA 
10001 11  IB 


lOOOOUlB 


INITIALIZE  PIO 
4 

PIOBC 
PIOIVB 
11001 11  IB 


101 1011  IB 


DB 


100 1000 IB 


; OUTPUT  3  BYTES 

; DESTINATION  IS  PORT  A  CONTROL 

;SET  INTERRUPT  VECTOR  FOR  PORT  A 

;BITS  3,2,1,0  =  1111   (MODE  SELECT) 

jBITS  5,4  =  00  (.DON'T  CARE) 

;EITS  7,6  =  01    (INPUT  MODE) 

jBITS  3,2,1,0  =  0111    (INTERRUPT  CONTROL) 

sBITS  6,5,4  =  000  (DON'T  CARE) 

J  BITS  7  =  1   (ENABLE  INTERRUPTS) 

PORT  B 

OUTPUT  4  BYTES 

DESTINATION  IS  PORT  B  CONTROL 
SET  INTERRUPT  VECTOR  FOR  PORT  E 
BITS  3,2,1,0  =  nil    (MODE  SELECT) 
BITS  5,4  =  00  (DON'T  CARE) 
BITS  7,6  =  11    (CONTROL  MODE) 
BITS  3,2,1,0  =  0111   (INTERRUPT  CONTROL) 
BIT  4  =  1   (MASK  FOLLOWS) 
BIT  5  =  1    (ACTIVE  STATE  ON  MONITORED 

INPUT  LINES  IS  1  FOR  AN  INTERRUPT) 
BIT  6=0   (INTERRUPT  IF  ANY  OF  THE 

MONITORED  INPUT  LINES  IS  ACTIVE^ 
BIT  7  =  1    (ENABLE  INTERRUPTS) 
MONITOR  INPUT  BITS  0,   4,   AND  7 
FOR  INTERRUPTS 


DB 


END  OF  PORT  INITIALIZATION  DATA 
0  ; TERMINATOR 


END 


Delay  Milliseconds  (DELAY) 


10F 


Provides  a  delay  of  between  1  and  256  milli- 
seconds, depending  on  the  parameter  supplied. 
A  parameter  value  of  0  is  interpreted  as  256.  The 
user  must  calculate  the  value  CPMS  (cycles  per 
millisecond)  to  fit  a  particular  computer.  Typical 
values  are  2000  for  a  2  MHz  clock,  4000  for  a 
4  MHz  clock,  and  6000  for  a  6  MHz  clock. 

Procedure:  The  program  simply  counts  down 
register  B  for  the  appropriate  amount  of  time  as 
determined  by  the  user-supplied  constant.  Extra 


Entry  Conditions 

Number  of  milliseconds  to  delay  (1  to  256)  in  A 


Registers  Used:  AF 

Execuflon  Time:  1  ms  *  (A) 

Program  Size:  31  bytes 

Data  IMemory  Required:  None 

Special  Case:  (A)  =  0  causes  a  delay  of  256  ms 


instructions  account  for  the  CALL  instruction, 
RET  instruction,  and  routine  overhead  without 
changing  anything. 


Exit  Conditions 

Returns  after  the  specified  delay  with  (A)  =  0 


Exampie 

1.     Data:        (A)=  numberof  milliseconds=  2A|j(42iq) 
Result:        Software  delay  of  2A|5  milliseconds,  with 
proper  CPMS  supplied  by  user 


Title  Delay  milliseconds 

Name:  Delay 


Purpose:  Delay  from  1  to  256  milliseconds 

Entry:  Register  A  =  Number  of  milliseconds  to  delay 

A  0  equals  256  milliseconds 

Exit:  Returns  to  calling  routine  after  the 

specified  delay 


391 


392  INPUT/OUTPUT 


Time:  i  millisecond  «  Register  A 

Sizes  Program  51  bytes 


; EQUATES 

; CYCLES  PER  MILLISECOND  -  USER-SUPPLIED 
CPMS        EQU  4000         ; 2000  =  2  MHZ  CLOCK 

■4000  =  4  MHZ  CLOCK 
;6000  =  6  MHZ  CLOCK 


DELAY! 


LDLP: 

LDLYl: 
LDLY2! 
LDLYS: 


METHOD: 

THE  ROUTINE  IS  DIVIDED  INTO  2  PARTS.   THE  CALL  TO 
THE  "DLY"  ROUTINE  DELAYS  EXACTLY  1  LESS  THAN  THE 
REQUIRED  NUMBER  OF  MILLISECONDS.   THE  LAST  ITERATION 
TAKES  INTO  ACCOUNT  THE  OVERHEAD  TO  CALL  "DELAY"  AND 
■DLY".   THIS  OVERHEAD  IS: 

==>  CALL  DELAY 
==>  PUSH  EC 
==>  CALL  DLY 
==>  DEC  A 
==>  RET  Z 


17  CYCLES 
11  CYCLES 
17  CYCLES 

4  CYCLES 
11  CYCLES 

7  CYCLES 
10  CYCLES 
13  CYCLES 
10  CYCLES 


DEC 
RET 
LD 
POP 
LD 
RET 


E,  (CPMS/100.)- 
BC 

A, (DELAY) 


100  CYCLES  OVERHEAD 

DO  ALL  BUT  THE  LAST  MILLISECOND 

!17  CYCLES  FOR  THE  USER'S  CALL 
PUSH        BC  ,11  CYCLES 

CALL         DLY  ;32  CYCLES  TO  RETURN  FROM  DLY 

;D0  2  LESS  THAN  1  MILLISECOND  FOR  OVERHEAD 
LD  B,+(.CPMS/50.l-2     ;7  CYCLES 


JP 
JP 

JP 

ADD 

DJNZ 


LDLYl 

LDLY2 

LDLY3 

A,0 

LDLP 


;67  CYCLES 

; 10  CYCLES 
10  CYCLES 
10  CYCLES 
7  CYCLES 
13  CYCLES 

50  CYCLES 


;EXIT  IN  33  CYCLES 

POP  BC 

LD  A,  (DELAY.) 


; 10  CYCLES 
;  13  CYCLES 
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RET 


; 10  CYCLES 
!33  CYCLES 


DLY: 


; ROUTINE!  DLY 

; PURPOSE:   DELAY  ALL  BUT  LAST  MILLISECOND 

; ENTRY:   REGISTER  A  =  TOTAL  NUMBER  OF  MILLISECONDS 

;EXIT:     DELAY  ALL  BUT  LAST  MILLISECOND 

f REGISTERS  USED:  AF,BC,HL 


DEC  A 
RET  Z 

LD  E,+CCPMS/50)-l 


4  CYCLES 

5  CYCLES  (RETURN  WHEN  DONE  11  CYCLES.l 
7  CYCLES 

16  CYCLES 


DLP: 

JP 

DLYl 

10  CYCLES 

DLYl: 

JP 

DLY2 

10  CYCLES 

DLY2! 

JP 

DLY3 

10  CYCLES 

DLY3! 

ADD 

A,0 

7  CYCLES 

DJNZ 

DLP 

13  CYCLES 

50  CYCLES 

jEXIT 

IN  34  CYCLES 

JP 

DLY4 

10  CYCLES 

DLY4: 

JP 

DLY5 

10  CYCLES 

DLY5: 

NOP 

4  CYCLES 

JP 

DLY 

10  CYCLES 

34  CYCLES 


SAMPLE  EXECUTION: 


SCI OF: 


QTRSCD: 


; DELAY  10  SECONDS 

;  CALL  DELAY  40  TIMES  AT  250  MILLISECONDS  EACH 
LD  B,40  ;40  TIMES  (.28  HEX) 


LD 

CALL 
DJNZ 


A,  250 
DELAY 
QTRSCD 


;250  MILLISECONDS  (FA  HEX.) 
; CONTINUE  UNTIL  DONE 


JR 


SCI  OF 


END 


Unbuffered  Input/Output 
Using  an  SIO  (SINTIO) 


11A 


Registers  Used: 

1.  INCH:  AF 

2.  INST:AF 

3.  DUTCH:  AF 

4.  OUTST:  AF 

5.  INIT:  AF,  BC,  HL,  I 
Execution  Time: 

1 .  INCH:  72  cycles  if  a  character  is  available 

2.  INST:  27  cycles 

3.  OUTCH:  150  cycles  if  the  output  buffer  is  not 
full  and  an  output  interrupt  is  expected;  75  additional 
cycles  to  send  the  data  to  the  SIO  if  no  output 
interrupt  is  expected. 

4.  OUTST:  27  cycles 

5.  INIT:  618  cycles 

6.  RDHDLR:  82  cycles 
7  WRHDL.R:  160  cycles 

Program  Size:  202  bytes 

Data  Memoiy  Required:  5  bytes  anywhere  in 
RAM  for  the  received  data  (address  RECDAT), 
Receive  Data  flag  (address  RECDF),  transmit  data 
(address  TRNDAT),  Transmit  Data  flag  (address 
TRNDF),  and  Output  Interrupt  Expected  flag  ad- 
dress DIE) 


Performs  interrupt-driven  input  and  output 
using  an  SIO  and  single-character  input  and 
output  buffers.  Consists  of  the  following  sub- 
routines: 

1.  INCH  reads  a  character  from  the  input 
buffer. 

2.  INST  determines  whether  the  input  buffer 
is  empty. 

3.  OUTCH  writes  a  character  into  the  output 
buffer. 

4.  OUTST  determines  whether  the  output 
buffer  is  full. 

5.  INIT  initializes  the  SIO,  the  interrupt 
vectors,  and  the  software  flags.  The  flags  are 
used  to  manage  data  transfers  between  the  main 
program  and  the  interrupt  service  routines. 

The  actual  service  routines  are 

1.  RDHDLR  responds  to  the  input  interrupt 
by  reading  a  character  from  the  SIO  into  the 
input  buffer. 

2.  WR H DLR  responds  to  the  output  interrupt 
by  writing  a  character  from  the  output  buffer 
into  the  SIO. 

Procedures 

1.  INCH  waits  for  a  character  to  become 
available,  clears  the  Data  Ready  flag  (RECDF), 
and  loads  the  character  into  the  accumulator. 

2.  INST  sets  Carry  from  the  Data  Ready  flag 
(RECDF). 

3.  OUTCH  waits  for  the  output  buffer  to 
empty,  stores  the  character  in  the  buffer,  and 
sets  the  Character  Available  flag  (TRNDF).  If 
no  output  interrupt  is  expected  (i.e.,  the  interrupt 


has  been  reset  because  it  occurred  when  no 
data  was  available),  OUTCH  sends  the  data  to 
the  SIO  immediately. 

4.  OUTST  sets  Carry  from  the  Character 
Available  flag  (TRNDF). 

5.  INIT  clears  the  software  flags,  sets  up  the 
interrupt  vectors,  and  initializes  the  SIO  by 
placing  the  appropriate  values  in  its  control 
registers.  See  Subroutine  lOE  for  more  details 
about  initializing  SIOs. 

6.  RDHDLR  reads  the  data,  saves  it  in  the 
input  buffer,  and  sets  the  Data  Ready  flag 
(RECDF). 
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7.  WRHDLR  determines  whether  data  is 
available.  If  not,  it  simply  resets  the  output 
interrupt.  If  data  is  available,  the  program  sends 
it  to  the  SIO  and  clears  the  Character  Available 
flag  (TRNDF). 

The  special  problem  here  is  that  an  output 
interrupt  may  occur  when  no  data  is  available. 
It  cannot  be  ignored  or  it  will  assert  itself 
indefinitely,  causing  an  endless  loop.  The  solution 
is  simply  to  reset  the  SIO's  transmit  interrupt 
without  sending  any  data. 

But  now  a  new  problem  arises  when  output 
data  becomes  available.  That  is,  since  the 
interrupt  has  been  reset,  it  obviously  cannot 
inform  the  system  that  the  SIO  is  ready  to 
transmit.  The  solution  is  to  have  a  flag  that 
indicates  (with  a  0  value)  that  the  output 
interrupt  has  occurred  without  being  serviced. 
This  flag  is  called  OIE  (Output  Interrupt 
Expected). 


The  initialization  routine  clears  OIE  (since 
the  SIO  surely  starts  out  ready  to  transmit).  The 
output  service  routine  clears  it  when  an  output 
interrupt  occurs  that  cannot  be  serviced  (no 
data  is  available)  and  sets  it  after  sending  data  to 
the  SIO  (in  case  it  might  have  been  cleared). 
Now  the  output  routine  OUTCH  can  check  OIE 
to  determine  whether  an  output  interrupt  is 
expected.  If  not,  OUTCH  simply  sends  the  data 
immediately. 

Note  that  an  SIO  interrupt  can  be  reset 
without  actually  sending  any  data.  This  is  not 
possible  with  a  PIO  (see  Subroutine  11 B),  so  the 
procedure  there  is  slightly  different. 

Unserviceable  interrupts  occur  only  with 
output  devices,  since  input  devices  always  have 
data  ready  to  transfer  when  they  request  service. 
Thus,  output  devices  cause  more  initialization 
and  sequencing  problems  in  interrupt-driven 
systems  than  do  input  devices. 


Entry  Conditions 


Exit  Conditions 


1.  INCH:  none 

2.  INST:  none 

3.  OUTCH:  character  to  transmit  in  A 

4.  OUTST:  none 

5.  INIT:  none 


1.  INCH:  character  in  A 

2.  INST:  Carry  =  0  if  input  buffer  empty,  1  if 
full 

3.  OUTCH:  none 

4.  OUTST:  Carry  =  0  if  output  buffer  empty, 
1  if  full 


5.  INIT:  none 


Title  Simple  interrupt  input  and  output  using  an  SIO 

and  single  character  buffers 
Name!  SINTIO 
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Purpose:  This  program  consists  of  5  subroutines  which 

perf orm-interrupt  driven  input  and  output  using 
an  SIO. 

INCH 

Read  a  character 
INST 

Determine  input  status  (whether  input 

buffer  is  empty) 
DUTCH 

Write  a  character 
OUTST 

Determine  output  status  (whether  output 
buffer  is  full) 
INIT 

Initialize  SIO  and  interrupt  system 

Entry;  INCH 

No  parameters 
INST 

No  parameters 
DUTCH 

Register  A  =  character  to  transmit 
OUTST 

No  parameters 
INIT 

No  parameters 

Exit!  INCH 

Register  A  =  character 
INST 

Carry  =  0  if  input  buffer  is  empty, 

1  if  character  is  available 
DUTCH 

No  parameters 
OUTST 

Carry  =  0  if  output  buffer  is  not 
full,   1  if  it  is  full 
INIT 

No  parameters 

Registers  used;    INCH  -  AF 
INST  -  AF 
DUTCH  -  AF 
OUTST  -  AF 
INIT  -  AF, BC,  HL,  I 

Time;  INCH 

72  cycles  if  a  character  is  available 
INST 

27  cycles 
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DUTCH 

150  cycles  if  output  buffer  is  not  full 
and  output  interrupt  is  expected 
OUTST 

27  cycles 
INIT 

618  cycles 
RDHDLR 

82  cycles 
WRHDLR 

160  cycles 


Size:  Program  202  bytes 

Data  5  bytes 


SIO  EQUATES 
SIO  IS  PROGRAMMED  FOR: 

ASYNCHRONOUS  OPERATION 

16  X  BAUD  RATE 

8-BIT  CHARACTERS 

1   1/2  STOP  BITS 
ARBITRARY  SIO  PORT  ADDRESSES 


SIOCAD 

EQU 

ICH 

SIO  CHANNEL  A  DATA 

SIOCBD 

EQU 

lEH 

SIO  CHANNEL  B  DATA 

SI OCAS 

EQU 

IDH 

SIO  CHANNEL  A  COMMANDS/STATUS 

SIOCBS 

EQU 

IFH 

SIO  CHANNEL  B  COMMANDS/STATUS 

SIOIV 

EQU 

8000H 

INTERRUPT  VECTOR 

SIOWV 

EQU 

SIOIV+8 

SIO  CHANNEL  A  WRITE  INTERRUPT  VECTOR 

SIOEV 

EQU 

SIOIV+10 

SIO  CHANNEL  A  EXTERNAL/STATUS  INTERRUPT 

VECTOR 

SIORV 

EQU 

SIOIV+12 

SIO  CHANNEL  A  READ  INTERRUPT  VECTOR 

SIOSV 

EQU 

SIOIV+14 

SIO  CHANNEL  A  SPECIAL  RECEIVE  INTERRUPT 

VECTOR 

;READ  CHARACTER 

INCH! 

CALL 

INST                        jGET  INPUT  STATUS 

JR 

NCINCH                  J  WAIT  IF  NO  CHARACTER  AVAILABLE 

DI 

{DISABLE  INTERRUPTS 

SUB 

A 

LD 

(RECDF), A 

! INDICATE  INPUT  BUFFER  EMPTY 

LD 

A, (RECDAT)             fGET  CHARACTER  FROM  INPUT  BUFFER 

EI 

J  ENABLE  INTERRUPTS 

RET 

; RETURN 

INPUT  STATUS  (CARRY  =  1   IF  INPUT  DATA  IS  AVAILABLE) 

INST: 

LD 

A, (RECDF)               J  GET  DATA  READY  FLAG 

RRA 
RET 

! WRITE  CHARACTER 


fSET  CARRY  FROM  DATA  READY  FLAG 

!    IF  CARRY  =  1,   CHARACTER  IS  AVAILABLE 
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DUTCH: 


WAITOC: 


PUSH        AF  [SAVE  CHARACTER  TO  WRITE 

jWAIT  FOR  CHARACTER  BUFFER  TO  EMPTY,   THEN  STORE  NEXT  CHARACTER 


OUTSTs 


INITs 


CALL 

JR 

DI 

POP 

LD 

LD 

LD 

LD 

OR 

CALL 

EI 
RET 


OUTST 
CWAITOC 


AF 

(TRNDATJ , A 
A,OFFH 
(TRNDF) ,A 
A, (OIE) 
A 

Z,OUTDAT 


I  GET  OUTPUT  STATUS 

;WAIT  IF  OUTPUT  BUFFER  IS  FULL 

J  DISABLE  INTERRUPTS  WHILE  LOOKING  AT 

;   SOFTWARE  FLAGS 

;GET  CHARACTER 

5 STORE  CHARACTER  IN  OUTPUT  BUFFER 
5  INDICATE  OUTPUT  BUFFER  FULL 

fTEST  OUTPUT  INTERRUPT  EXPECTED  FLAG 

; OUTPUT  CHARACTER  IMMEDIATELY  IF 
!  NO  OUTPUT  INTERRUPT  EXPECTED 
! ENABLE  INTERRUPTS 


; OUTPUT  STATUS  (CARRY  =  1   IF  OUTPUT  BUFFER  IS  FULL) 
A, < TRNDF) 


LD 
RRA 
RET 


;GET  TRANSMIT  FLAG 
liSET  CARRY  FROM  TRANSMIT  FLAG 
!   CARRY  =  1   IF  BUFFER  FULL 


INITIALIZE  INTERRUPT  SYSTEM  AND  SIO 

J  DISABLE  INTERRUPTS  FOR  INITIALIZATION 

f INITIALIZE  SOFTWARE  FLAGS 
SUB  A 

LD  (RECDF),A  ; NO  INPUT  DATA  AVAILABLE 

LD  (TRNDF), A  ; OUTPUT  BUFFER  EMPTY 

LD  (OIE), A  5N0  OUTPUT  INTERRUPT  EXPECTED 

!   SIO  IS  READY  TO  TRANSMIT  INITIALLY 

; INITIALIZE  INTERRUPT  VECTORS 


LD 

A.SIOIV  SHR  8 

;GET  INTERRUPT  PAGE  NUMBER 

LD 

I, A 

;SET  INTERRUPT  VECTOR  IN  Z80 

IM 

2 

5  INTERRUPT  MODE  2  -  VECTORS  IN  TABLE 

}  ON  INTERRUPT  PAGE 

LD 

HL,RDHDLR 

J  STORE  READ  VECTOR  (INPUT  INTERRUPT) 

LD 

(SIORV),HL 

LD 

HL,WRHDLR 

J  STORE  WRITE  VECTOR  (OUTPUT  INTERRUPT) 

LD 

(SIOWV),HL 

LD 

HL,EXHDLR 

? STORE  EXTERNAL/STATUS  VECTOR 

LD 

(SIOEV),HL 

LD 

HL, REHDLR 

! STORE  RECEIVE  ERROR  VECTOR 

LD 

(SIOSV),HL 

INITIALIZE  SIO 

LD 

HL,SIOINT 

;GET  BASE  OF  INITIALIZATION  ARRAY 

CALL 

I PORTS 

; INITIALIZE  SIO 

EI 

! ENABLE  INTERRUPTS 

RET 
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RDHDLR: 


RDl! 


; INPUT  (READ)    INTERRUPT  HANDLER 


PUSH 

IN 

LD 

LD 

LD 

POP 

EI 

RET  I 


AF 

A, (SIOCAD) 

(RECDAT),A 

ArOFFH 

(RECDF),A 

AF 


;SAVE  AF 

?READ  DATA  FROM  SIO 

;SAVE  DATA  IN  INPUT  BUFFER 

J  INDICATE  INPUT  DATA  AVAILABLE 
! RESTORE  AF 
jREENABLE  INTERRUPTS 


5  OUTPUT  (WRITE)   INTERRUPT  HANDLER 

WRHDLR; 

PUSH  AF 

LD  A.(TRNDF)  s GET  DATA  AVAILABLE  FLAG 

RRA 

JR  NCNODATA  s  JUMP  IF  NO  DATA  TO  TRANSMIT 

CALL  OUTDAT  ; OUTPUT  DATA  TO  SIO 

JR  WRDONE 


5  IF  AN  OUTPUT  INTERRUPT  OCCURS  WHEN  NO  DATA  IS  AVAILABLE, 
;   WE  MUST  RESET  IT  TO  AVOID  AN  ENDLESS  LOOP.   LATER.   WHEN  A 
;   CHARACTER  BECOMES  AVAILABLE,  WE  NEED  TO  KNOW  THAT  AN  OUTPUT 
J    INTERRUPT  HAS  OCCURRED  WITHOUT  BEING  SERVICED.     THE  KEY  HERE 
?    IS  THE  OUTPUT  INTERRUPT  EXPECTED  FLAG  OIE.     THIS  FLAG  IS 
;   CLEARED  WHEN  AN  OUTPUT  INTERRUPT  HAS  OCCURRED  BUT  HAS  NOT 
t   BEEN  SERVICED.     IT  IS  ALSO  CLEARED  INITIALLY  SINCE  THE 
J  SIO  STARTS  OUT  READY.     OIE  IS  SET  WHENEVER  DATA  IS  ACTUALLY 
J  SENT  TO  THE  SIO.  THUS  THE  OUTPUT  ROUTINE  OUTCH  CAN  CHECK 
?   OIE  TO  DETERMINE  WHETHER  TO  SEND  THE  DATA  IMMEDIATELY 
?  OR  WAIT  FOR  AN  OUTPUT  INTERRUPT. 

?THE  PROBLEM  IS  THAT  AN  OUTPUT  DEVICE  MAY  REQUEST  SERVICE  BEFORE 

;   THE  COMPUTER  HAS  ANYTHING  TO  SEND  (UNLIKE  AN  INPUT  DEVICE 

;  THAT  HAS  DATA  WHEN  IT  REQUESTS  SERVICE).     THE  OIE  FLAG 

J  SOLVES  THE  PROBLEM  OF  AN  UNSERVICED  OUTPUT  INTERRUPT  ASSERTING 

J    ITSELF  REPEATEDLY,  WHILE  STILL  ENSURING  THE  RECOGNITION  OF 

J  OUTPUT  INTERRUPTS. 

NODATA: 

SUB  A 

LD  (OIE), A  f DO  NOT  EXPECT  AN  INTERRUPT 

OUT  (SI OCAS), A  ? SELECT  REGISTER  0 

LD  A,00101000B  ; RESET  SIO  TRANSMITTER  INTERRUPT 

OUT  (SIOCAS),A 


WRDONE: 

POP  AF  ;  RESTORE  AF 

EI 

RET  I 


; EXTERNAL/STATUS  CHANGED  INTERRUPT  HANDLER 

EXHDLRs 

PUSH  AF 

LD  A,00010000B  f RESET  STATUS  INTERRUPT 

OUT  (SIOCAS),A 

EI  ?DCD  OR  CTS  CHANGED  STATE,   OR  A  BREAK 
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REHDLR: 


POP  AF  5   WAS  DETECTED 

RET I  5 SERVICE  HERE  IF  NECESSARY 

; SPECIAL  RECEIVE  ERROR  INTERRUPT 

PUSH  AF 

LD  A.OOllOOOOB  s RESET  RECEIVE  ERROR  INTERRUPT 

OUT  (SIOCASnA 

EI  s FRAMING  ERROR  OR  OVERRUN  ERROR 

POP  AF  }  OCCURRED 

RET I  ; SERVICE  HERE  IF  NECESSARY 


; ROUTINE:  OUTDAT 

;  PURPOSE:   SEND  CHARACTER  TO  SIO 

; ENTRY:   TRNDAT  =  CHARACTER 

fEXIT:  NONE 

J  REGISTERS  USED:  AF 

OUTDAT: 


LD 

A, (TRNDAT) 

jGET  DATA  FROM  OUTPUT  BUFFER 

OUT 

(SIOCAD).A 

5 SEND  DATA  TO  SIO 

SUB 

A 

S INDICATE  OUTPUT  BUFFER  EMPTY 

LD 

CTRNDF) , A 

DEC 

A 

! INDICATE  OUTPUT  INTERRUPT  EXPECTED 

LD 

(OIE),A 

J  OIE  =  FF  HEX 

RET 

I PORTS: 


5  ROUTINES    I PORTS 

? PURPOSES   INITIALIZE  I/O  PORTS 

J  ENTRY:  HL  =  BASE  ADDRESS  OF  INITIALIZATION  ARRAY 
5 EXIT:     DATA  OUTPUT  TO  PORTS 
f REG I STEPS  USED!  AF,EC,HL 

J  GET  NUMBER  OF  DATA  BYTES  TO  SEND  TO  CURRENT  PORT 
SEXIT  IF  NUMBER  OF  BYTES  IS  0.    INDICATING  TERMINATOR 

;GET  NUMBER  OF  BYTES 
jTEST  FOR  ZERO  (TERMINATOR) 
J  RETURN  IF  NUMBER  OF  BYTES  =  0 

? POINT  TO  PORT  ADDRESS  (NEXT  BYTE) 


LD 

A, (HL) 

OR 

A 

RET 

Z 

LD 

B.A 

INC 

HL 

;C  = 

PORT  ADDRESS 

!HL 

=  BASE  ADDRESS 

LD 

C, (HL) 

INC 

HL 

jGET  PORT  ADDRESS 

jPOINT  TO  FIRST  DATA  VALUE  (NEXT  BYTE) 

; OUTPUT  DATA  AND  CONTINUE  TO  NEXT  PORT 

OTIR  fSEND  DATA  VALUES  TO  PORT 

JR  IPORTS  ! CONTINUE  TO  NEXT  PORT  ENTRY 


SSIO  INITIALIZATION  DATA 
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SIOINT: 

; RESET  CHANNEL  A 

DB  1  : OUTPUT  1  BYTE 

DB  SIOCAS  ! DESTINATION  IS  CHANNEL  A  COMMAND/STATUS 

DB  OOOllOOOB  J  SELECT  WRITE  REGISTER  0 

jBITS  2,1,0  =  0  (WRITE  REGISTER  0) 
sBITS  5,4.3  =  Oil   (CHANNEL  RESET.) 
jBITS  7,6  =  0  (DO  NOT  CARE) 


;SET 

INTERRUPT  VECTOR  AND  ALLOW  STATUS  TO  AFFECT  IT 

DB 

4 

! OUTPUT  2  BYTES 

DB 

SIOCBS 

S DESTINATION  IS  COMMAND  REGISTER  B 

OB 

0000001 OB 

f SELECT  WRITE  REGISTER  2 

OB 

SIOIV  AND  OFFH 

5 SET  INTERRUPT  VECTOR  FOR  SIO 

DB 

0000000 IB 

; SELECT  WRITE  REGISTER  1 

DB 

00000 lOOB 

SALLOW  STATUS  TO  AFFECT  VECTOR 

J  INITIALIZE  CHANNEL  A 

DB  8  : OUTPUT  S  BYTES 

DB  SIOCAS  ! DESTINATION  IS  COMMAND  REGISTER  A 


; INITIALIZE  BAUD  RATE  CONTROL 

DB  OOOIOIOOB  !  SELECT  WRITE  REGISTER  4 

5   RESET  EXTERNAL/STATUS  INTERRUPT 

DB  OlOOlOOOB  I  BIT  0  =  0  (NO  PARITY.) 

;BIT  1  =  0  (DON'T  CARE) 

sBITS  3,2  =  10  (1   1/2  STOP  BITS) 

SBITS  5,4  =  00  (DON'T  CARE) 

J  BITS  7,6  =  01   (16  TIMES  CLOCK) 

; INITIALIZE  RECEIVE  CONTROL 

DB  0000001  IB  ; SELECT  WRITE  REGISTER  3 

DB  UOOOOOIB  fBIT  0  =  1   (RECEIVE  ENABLE) 

jBITS  4,3,2,1  =  0  (DON'T  CARE) 

SBIT  5  =  0  (NO  AUTO  ENABLE) 

sBIT  7,6  =  11   (RECEIVE  8  BITS/CHAR) 


f INITIALIZE  TRANSMIT  CONTROL 


DB 
DB 


DB 
DB 


000001 01 B 
lUOlOlOB 


0000000 IB 
0001 101  IB 


SELECT 
BIT  0 
BIT  1 
BIT  2 
BIT  3 
BIT  4 
BITS 


WRITE  REGISTER  5 
0  (NO  CRC  ON  TRANSMIT) 
(REQUEST  TO  SEND) 
(DON'T  CARE) 
(TRANSMIT  ENABLE) 
(DO  NOT  SEND  BREAK) 
11   (TRANSMIT  8  BITS/CHAR) 


=  1 
=  0 
=  1 
=  0 
6,5  = 


BIT  7  =  1   (DATA  TERMINAL  READY) 

SELECT  WRITE  REGISTER  1 

BIT  0  =  1   (EXTERNAL  INTERRUPTS) 

BIT  1  =  1    (ENABLE  TRANSMIT  INTERRUPT) 

BIT  2  =  0  (DO  NOT  CARE) 

BITS  4,3  =  11   (RECEIVE  INTERRUPTS  ON 

ALL  CHARS,   PARITY  DOES  NOT  AFFECT 

VECTOR) 

BITS  7,6,5  =  000  (NO  WAIT/READY 
FUNCTION) 
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OB 


(TERMINATOR  FOR  INITIALIZATION  ARRAY 


fDATA  SECTION 
RECDAT:  DS  1 
RECDF:     DS  1 


TRNDATs  DS 
TRNDF:  DS 


OIE! 


DS 


RECEIVE  DATA 
RECEIVE  DATA  FLAG 

(0  =  NO  DATA,   FF  =  DATA  AVAILABLE) 
TRANSMIT  DATA 
TRANSMIT  DATA  FLAG 

(0  =  BUFFER  EMPTY.  FF  =  BUFFER  FULL) 
OUTPUT  INTERRUPT  EXPECTED 

(0  =  NO  INTERRUPT  EXPECTED, 

FF  =  INTERRUPT  EXPECTED) 


SAMPLE  EXECUTION: 


ESCAPE 
TESTCH 

SCllA; 


LOOP: 


ASYNLP: 


; CHARACTER  EQUATES 
EQU  IBH 
EQU  'A' 


CALL 


INIT 


! ASCI I  ESCAPE  CHARACTER 
rTEST  CHARACTER  =  A 


; INITIALIZE  SIO,    INTERRUPT  SYSTEM 


? SIMPLE  EXAMPLE  -  READ  AND  ECHO  CHARACTERS 
!  UNTIL  AN  ESC  IS  RECEIVED 


CALL 

PUSH 

CALL 

POP 

CP 

JR 


INCH 
AF 

OUTCH 
AF 

ESCAPE 
NZ , LOOP 


J  READ  CHARACTER 

sECHO  CHARACTER 

J  IS  CHARACTER  AN  ESCAPE? 
fSTAY  IN  LOOP  IF  NOT 


?AN  ASYNCHRONOUS  EXAMPLE 

;  OUTPUT  "A"  TO  CONSOLE  CONTINUOUSLY,  BUT  ALSO  LOOK  AT 
;    INPUT  SIDE,   READING  AND  ECHOING  ANY  INPUT  CHARACTERS 

S OUTPUT  AN  "A"   IF  OUTPUT  IS  NOT  BUSY 
CALL        OUTST  ; IS  OUTPUT  BUSY? 

JR  C. ASYNLP  tJUMP  IF  IT  IS 

LD  A, TESTCH 

CALL        OUTCH  ; OUTPUT  TEST  CHARACTER 

J CHECK  INPUT  PORT 

fECHO  CHARACTER  IF  ONE  IS  AVAILABLE 
;EXIT  ON  ESCAPE  CHARACTER 
CALL  INST 
JR  NC, ASYNLP 

CALL  INCH 
CP  ESCAPE 
JR  Z,DONE 


;IS  INPUT  DATA  AVAILABLE? 
SJUMP  IF  NOT  (SEND  ANOTHER 
:GET  CHARACTER 
!IS  IT  AN  ESCAPE? 
! BRANCH  IF  IT  IS 


"A") 
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CALL        OUTCH  jELSE  ECHO  CHARACTER 

JP  ASYNLP  5  AND  CONTINUE 

DONE: 

JP  LOOP 
END 


Unbuffered  Input/Output 
Using  a  PIO  (PINTIO) 


11B 


Registers  Used: 

1.  INCH:  AF 

2.  INST:  AF 

3.  DUTCH:  AF 

4.  OUTST:  AF 

5.  INIT:  AF,  BC,  HL,  I 
Execution  Time: 

1.  INCH:  72  cycles  if  a  character  is  available 

2.  INST:  27  cycles 

.3.  OUTCH:  150  cycles  if  the  output  buffer  is  not 
full  and  an  output  interrupt  is  expected;  93  additional 
cycles  to  send  the  data  to  the  PIO  if  no  output 
interrupt  is  expected. 

4.  OUTST:  27  cycles 

5.  INIT:  377  cycles 

6.  RDHDLR:  82  cycles 

7.  WRHDLR;  178  cycles 
Program  Size:  166  bytes 

Data  Memory  Required:  5  bytes  anywhere  in 
RAM  for  the  received  data  (address  RECDAT), 
Receive  Data  flag  (address  RECDF),  transmit  data 
(address  TRNDAT),  Transmit  Data  flag  (address 
TRNDF),  and  Output  Interrupt  Expected  flag(address 
OIE) 


Performs  interrupt-driven  input  and  output 
using  a  PIO  and  single-character  input  and 
output  buffers.  It  consists  of  the  following 
subroutines: 

1.  INCH  reads  a  character  from  the  input 
buffer. 

2.  INST  determines  whether  the  input  buffer 
is  empty. 

3.  OUTCH  writes  a  character  into  the  output 
buffer. 

4.  OUTST  determines  whether  the  output 
buffer  is  full. 

5.  INIT  initializes  the  PIO,  the  interrupt 
vectors,  and  the  software  flags.  The  flags  are 
used  to  manage  data  transfers  between  the  main 
program  and  the  interrupt  service  routines. 

The  actual  service  routines  are 

1 .  RDHDLR  responds  to  the  input  interrupt 
by  reading  a  character  from  the  PIO  into  the 
input  buffer. 

2.  WRHDLR  responds  to  the  output  interrupt 
by  writing  a  character  from  the  output  buffer 
into  the  PIO. 

Procedures 

1.  INCH  waits  for  a  character  to  become 
available,  clears  the  Data  Ready  flag  (RECDF), 
and  loads  the  character  into  the  accumulator. 

2.  INST  sets  Carry  from  the  Data  Ready  flag 
(RECDF). 

3.  OUTCH  waits  for  the  output  buffer  to 
empty,  stores  the  character  in  the  buffer,  and 
sets  the  Character  Available  flag  (TRNDF),  If 
no  output  interrupt  is  expected  (i.e.,  the  interrupt 


has  been  disabled  because  it  occurred  when  no 
data  was  available),  OUTCH  sends  the  data  to 
the  PIO  immediately. 

4.  OUTST  sets  Carry  from  the  Character 
Available  flag  (TRNDF). 

5.  INIT  clears  the  software  flags,  sets  up  the 
interrupt  vectors,  and  initializes  the  PIO  by 
loading  its  control  registers  and  interrupt  vec- 
tor. See  Chapter  1  and  Subroutine  lOE  for  more 
details  about  initializing  PIOs. 

6.  RDHDLR  reads  the  data,  saves  it  in  the 
input  buffer,  and  sets  the  Data  Ready  flag 
(RECDF). 
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7.  WRHDLR  determines  whether  data  is 
available.  If  not,  it  simply  disables  the  output 
(PIO  port  B)  interrupt.  If  data  is  available, 
WRHDLR  sends  it  to  the  PIO  and  clears  the 
Character  Available  flag  (TRNDF). 

The  special  problem  here  is  that  an  output 
interrupt  may  occur  when  no  data  is  available. 
It  cannot  simply  be  ignored  or  it  will  assert  it- 
self indefinitely,  causing  an  endless  loop.  The 
solution  is  simply  to  disable  the  output  in- 
terrupt from  PIO  port  B. 

But  now  a  new  problem  arises  when  output 
data  becomes  available.  That  is,  since  the 
interrupt  has  been  disabled,  it  obviously 
cannot  inform  the  system  that  the  output  de- 
vice is  ready  for  data.  The  solution  is  to  have 
a  flag  that  indicates  (with  a  0  value)  that  the 
output  interrupt  has  occurred  without  being 
serviced.  This  flag  is  called  OIE  (Output  In- 
terrupt Expected). 


Entry  Conditions 

1.  INCH:  none 

2.  INST:  none 

3.  OUTCH:  character  to  transmit  in  A 

4.  OUTST:  none 

5.  INIT:  none 


The  initialization  routine  clears  OIE  (since 
the  output  device  surely  starts  out  ready  for 
data).  The  output  service  routine  clears  it  when 
an  output  interrupt  occurs  that  cannot  be 
serviced  (no  data  is  available)  and  sets  it  after 
sending  data  to  the  PIO  (in  case  it  might  have 
been  cleared).  Now  the  output  routine  OUTCH 
can  check  OIE  to  determine  whether  an  output 
interrupt  is  expected.  If  not,  OUTCH  simply 
sends  the  data  immediately. 

Note  that  a  PIO  interrupt  cannot  be  cleared 
without  actually  sending  any  data.  This  is 
possible  with  an  SIO  (see  Subroutine  11  A),  so 
the  procedure  there  is  slightly  different. 

Unserviceable  interrupts  occur  only  with 
output  devices,  since  input  devices  always  have 
data  ready  to  transfer  when  they  request  service. 
Thus,  output  devices  cause  more  initialization 
and  sequencing  problems  in  interrupt-driven 
systems  than  do  input  devices. 


Exit  Conditions 

1.  INCH:  character  in  A 

2.  INST:  Carry    0  if  input  buffer  empty,  I  if 
full 

3.  OUTCH:  none 

4.  OUTST:  Carry  =  0  if  output  buffer  empty, 
1  if  full 

5.  INIT:  none 


Title 
Name: 


Simple  interrupt  input  and  output  usinq  a  Z80 

PIO  and  single  character  buffers 

PINTIO 
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Purpose:  This  program  consists  of  5  subroutines  which 

perform  interrupt  driven  input  and  output  using 
a  Z80  PIO. 

INCH 

Read  a  character 
INST 

Determine  input  status  (whether  input 

buffer  is  empty) 
DUTCH 

Write  a  character 
OUTST 

Determine  output  status  (whether  output 
buffer  is  full) 
INIT 

Initialize  PIO  and  interrupt  system 

Entry:  INCH 

No  parameters 
INST 

No  parameters 
DUTCH 

Register  A  =  character  to  transmit 
OUTST 

No  parameters 
INIT 

No  parameters 

Exit!  INCH 

Register  A  =  character 
INST 

Carry  =  0  if  input  buffer  is  empty. 

1  if  character  is  available 
DUTCH 

No  parameters 
OUTST 

Carry  =  0  if  output  buffer  is  not 
full,   1  if  it  is  full 
INIT 

No  parameters 

Registers  used:  INCH 

A.F 
INST 

A,F 
DUTCH 

A,F 
OUTST 

A,F 
INIT 

A,F,BC,HL, I 
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Time; 


INCH 

72  cycles  if  a  character  is  available 
INST 

27  cycles 
DUTCH 

150  cycles  if  output  buffer  is  not  full 
and  output  interrupt  is  expected 
OUTST 

27  cycles 
INIT 

377  cycles 
RDHDLR 

82  cycles 
WRHDLR 

178  cycles 


Size: 


Program  166  bytes 
Data  5  bytes 


PIOAD 

PIOAC 

PIOBD 

PIOBC 

INTRPV 

PIOIVA 

PIOIVB 


PIO  EQUATES 
PIO  IS  PROGRAMMED  FOR: 

PORT  A  INPUT 

PORT  B  OUTPUT 
ARBITRARY  PIO  PORT  ADDRESSES 


EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 


90H 

91H 

92H 

93H 

8000H 

INTRPV 

INTRPV+S 


sPORT  A  DATA 

jPORT  A  CONTROL 

J  PORT  B  DATA 

sPORT  E  CONTROL 

SEASE  OF  INTERRUPT  VECTORS 

; INTERRUPT  VECTOR  FOR  PORT  A 

{INTERRUPT  VECTOR  FOR  PORT  B 


:READ  CHARACTER 


INCH: 


CALL 

JR 

DI 

SUB 

LD 

LD 

EI 

RET 


INST 
NC, INCH 


(RECDF) , A 
A. (RECDAT) 


SGET  INPUT  STATUS 

J  WAIT  IF  NO  CHARACTER  AVAILABLE 

; DISABLE  INTERRUPTS 

; INDICATE  INPUT  BUFFER  EMPTY 
sGET  CHARACTER  FROM  INPUT  BUFFER 
jREENAELE  INTERRUPTS 


INST: 


DUTCH: 


f RETURN  INPUT  STATUS  (CARRY  =  1  IF  INPUT  DATA  IS  AVAILABLE) 


LD 
RRA 


A, (RECDF) 


RET 

; WRITE  CHARACTER 


PUSH 


AF 


sGET  DATA  READY  FLAG 

J  SET  CARRY  FROM  DATA  READY  FLAG 

!    IF  CARRY  =  1,  CHARACTER  IS  AVAILABLE 


iSAVE  CHARACTER  TO  WRITE 
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jWAIT  FOR  CHARACTER  BUFFER  TO  EMPTY,   THEN  STORE  NEXT  CHARACTER 

WAITOCs 


CALL 

OUTST 

;GET  OUTPUT  STATUS 

JR 

CWAITOC 

SWAIT  IF  OUTPUT  BUFFER  IS  FULL 

DI 

! DISABLE  INTERRUPTS  WHILE  LOOKING  AT 
s   SOFTWARE  FLAGS 

POP 

AF 

;GET  CHARACTER 

LD 

(TRNDAT),A 

5 STORE  CHARACTER  IN  OUTPUT  BUFFER 

LD 

A,OFFH 

! INDICATE  OUTPUT  BUFFER  FULL 

LD 

(TRNDF), A 

LD 

A,  (OIE) 

J  TEST  OUTPUT  INTERRUPT  EXPECTED  FLAG 

OR 

A 

CALL 

Z.OUTDAT 

; OUTPUT  CHARACTER  IMMEDIATELY  IF 
;   NO  OUTPUT  INTERRUPT  EXPECTED 

EI 

; ENABLE  INTERRUPTS 

RET 

OUTST ! 


INIT: 


{OUTPUT  STATUS  (CARRY  =  1   IF  OUTPUT  BUFFER  IS  FULL) 
A, (TRNDF) 


LD 
RRA 
RET 


jGET  TRANSMIT  FLAG 
!SET  CARRY  FROM  TRANSMIT  FLAG 
!  CARRY  =  1   IF  OUTPUT  BUFFER  FULL 


{INITIALIZE  PIO  AND  INTERRUPT  SYSTEM 

DI  {DISABLE  INTERRUPTS 


{INITIALIZE  SOFTWARE  FLAGS 
SUB  A 

LD  (RECDF),A  {NO  INPUT  DATA  AVAILABLE 

LD  (TRNDF), A  {OUTPUT  BUFFER  EMPTY 

LD  (OIE), A  {NO  OUTPUT  INTERRUPT  EXPECTED 

{   DEVICE  IS  READY  INITIALLY 


{INITIALIZE  INTERRUPT  VECTORS 


LD 

A,INTRPV  SHR  8 

{GET  HIGH  BYTE  OF  INTERRUPT  PAGE 

LD 

I, A 

{SET  INTERRUPT  VECTOR  IN  Z80 

IM 

2 

{INTERRUPT  MODE  2  -  VECTORS  IN  TABLE 

!   ON  INTERRUPT  PAGE 

LD 

HL,RDHDLR 

{STORE  READ  VECTOR  (INPUT  INTERRUPT) 

LD 

(PIOIVA),HL 

LD 

HL,WRHDLR 

{STORE  WRITE  VECTOR  (OUTPUT  INTERRUPT) 

LD 

(PIOIVB),HL 

{INITIALIZE  PIO 

LD  HL.PIOINT  {BASE  ADDRESS  OF  INITIALIZATION  ARRAY 

CALL         IPORTS  {INITIALIZE  PIO 

EI  {   ENABLE  INTERRUPTS 

RET 


{INPUT  (READ)   INTERRUPT  HANDLER 

RDHDLRs 

PUSH  AF 

IN  A, (PIOAD)  {READ  DATA  FROM  PIO 

LD  (RECDAT),A  {SAVE  DATA  IN  INPUT  BUFFER 
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LD  A,OFFH  INDICATE  INPUT  DATA  AVAILABLE 

LD  (RECDF),A 

POP  AF 

EI  5REENABLE  INTERRUPTS 

RET  I 


? OUTPUT  (WRITE)   INTERRUPT  HANDLER 

WRHDLRs 

PUSH  AF 

LD  A, (TRNDF)  ;GET  DATA  AVAILABLE  FLAG 

RRA 

JR  NCNODATA  jJUMP  IF  NO  DATA  TO  TRANSMIT 

CALL  OUTDAT  5 OUTPUT  DATA  TO  PIO 

JR  WRDONE 


sIF  AN  OUTPUT  INTERRUPT  OCCURS  WHEN  NO  DATA  IS  AVAILABLE, 

;  WE  MUST  DISABLE  IT  TO  AVOID  AN  ENDLESS  LOOP,     LATER,  WHEN  A 

;  CHARACTER  BECOMES  AVAILABLE,   WE  NEED  TO  KNOW  THAT  AN  OUTPUT 

J    INTERRUPT  HAS  OCCURRED  WITHOUT  BEING  SERVICED.     THE  KEY  HERE 

;    IS  THE  OUTPUT  INTERRUPT  EXPECTED  FLAG  DIE.     THIS  FLAG  IS 

!  CLEARED  WHEN  AN  OUTPUT  INTERRUPT  HAS  OCCURRED  BUT  HAS  NOT 

;  BEEN  SERVICED.    IT  IS  ALSO  CLEARED  INITIALLY  SINCE  THE 

?  OUTPUT  DEVICE  IS  ASSUMED  TO  START  OUT  READY.     OIE  IS  SET 

?  WHENEVER  DATA  IS  ACTUALLY  SENT  TO  THE  PIO.   THUS  THE  OUTPUT  ROUTINE 

s  OUTCH  CAN  CHECK  OIE  TO  DETERMINE  WHETHER  TO  SEND  THE  DATA 

S   IMMEDIATELY  OR  WAIT  FOR  AN  OUTPUT  INTERRUPT. 

sTHE  PROBLEM  IS  THAT  AN  OUTPUT  DEVICE  MAY  REQUEST  SERVICE  BEFORE 

f  THE  COMPUTER  HAS  ANYTHING  TO  SEND  (UNLIKE  AN  INPUT  DEVICE 

?  THAT  HAS  DATA  WHEN  IT  REQUESTS  SERVICE).     THE  OIE  FLAG  SOLVES 

;  THE  PROBLEM  OF  AN  UNSERVICED  OUTPUT  INTERRUPT  ASSERTING  ITSELF 

;  REPEATEDLY,   WHILE  STILL  ENSURING  THE  RECOGNITION  OF 

J  OUTPUT  INTERRUPTS. 

NODATA: 

SUB  A 

LD  (OIE), A  J  INDICATE  NO  OUTPUT  INTERRUPT  EXPECTED 

LD  A, 000000 HB  ; DISABLE  OUTPUT  INTERRUPTS 

OUT  (PIOBC),A 


WRDONEs 

POP  AF  ; RESTORE  REGISTERS 

EI 

RET  I 


: ROUTINE:  OUTDAT 

5  PURPOSE;  SEND  CHARACTER  TO  PIO  PORT  B 

SENTRY:  TRNDAT  =  CHARACTER 

jEXIT:  NONE 

: REGISTERS  USED:  AF 

OUTDAT: 

LD  A, (TRNDAT)  jGET  DATA  FROM  OUTPUT  BUFFER 

OUT  (PIOBD),A  jSEND  DATA  TO  PIO 

SUB  A  ; INDICATE  OUTPUT  BUFFER  EMPTY 
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LD  CTRNDF>,A 

DEC  A  {INDICATE  OUTPUT  INTERRUPT  EXPECTED 

LD  (OIE),A  ;   OIE  =  FF  HEX 

LD  A, 1000001 IB  ; ENABLE  OUTPUT  INTERRUPTS 

OUT  (PIOBC),A 

RET 


J  ROUTINE:    I PORTS 

sPURPOSE:    INITIALIZE  I/O  PORTS 

SENTRY:  HL  =  BASE  ADDRESS  OF  INITIALIZATION  ARRAY 
sEXIT:     DATA  OUTPUT  TO  PORTS 
J  REGISTERS  USED;  AF,BC,HL 

I PORTS: 

;GET  NUMBER  OF  DATA  BYTES  TO  SEND  TO  CURRENT  PORT 
sEXIT  IF  NUMBER  OF  BYTES  IS  0,    INDICATING  TERMINATOR 
LD  A, (HL)  ;GET  NUMBER  OF  BYTES 

OR  A  ;TEST  FOR  ZERO  (TERMINATOR) 

RET  Z  : RETURN  IF  NUMBER  OF  BYTES  =  0 

LD  B,  A 

INC  HL  f POINT  TO  PORT  ADDRESS  (NEXT  BYTE) 

:C  =  PORT  ADDRESS 

}HL  =  BASE  ADDRESS  OF  OUTPUT  DATA 

LD  C.(HL)  sGET  PORT  ADDRESS 

INC  HL  JPOINT  TO  FIRST  DATA  VALUE  (NEXT  BYTE) 


{OUTPUT  DATA  AND  CONTINUE  TO  NEXT  PORT 

OTIR  jSEND  DATA  VALUES  TO  PORT 

JR  IPORTS  !  CONTINUE  TO  NEXT  PORT  ENTRY 

jPIO  INITIALIZATION  DATA 
!  PORT  A  =  INPUT 
J  PORT  B  =  OUTPUT 

PIOINTs 

DB  3  J  OUTPUT  3  BYTES 

DB  PIOAC  s DESTINATION  IS  PORT  A  CONTROL 

DB  PIOIVA  AND  OFFH  sSET  INTERRUPT  VECTOR  FOR  PORT  A 

DB  100011 IIB  fBITS  3,2,1.0  =  1111   (MODE  SELECT) 

;BITS  5,4  =  00  (DON'T  CARE) 
SBITS  7,6  =  01   (INPUT  MODE) 
DB  100001 1 IB  :BITS  3.2.1.0  =  0111   (INTERRUPT  CONTROL) 

;BITS  6,5,4  =  000  (DON'T  CARE) 
SBITS  7  =  1   (ENABLE  INTERRUPTS) 


DB  3  J  OUTPUT  3  BYTES 

DB  PIOBC  ! DESTINATION  IS  PORT  B  CONTROL 

DB  PIOIVB  AND  OFFH  ;SET  INTERRUPT  VECTOR  FOR  PORT  B 

DB  11001 11  IB  sBlTS  3,2,1.0  =  1111   (MODE  SELECT) 

fBITS  5,4  =  00  (DON'T  CARE) 
!BITS  7,6  =  00  (CONTROL  MODE) 
DB  OOOOOlllB  sBITS  3.2. 1,0  =  0111    (INTERRUPT  CONTROL) 

jBIT  4,5,6  =  000  (DON'T  CARE) 
jBITS  7  =  0  (DISABLE  INTERRUPTS) 
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DB 


S TERMINATOR  FOR  INITIALIZATION  ARRAY 


sDATA  SECTION 
REGDAT:  DS  1 
RECDFs     DS  1 


; RECEIVE  DATA 

; RECEIVE  DATA  FLAG 

J   (0  =  NO  DATA.   FF  =  DATA) 


TRNDATi  DS 
TRNDF:  DS 


OIE: 


DS 


J  TRANSMIT  DATA 

! TRANSMIT  DATA  FLAG 

;  (0  =  BUFFER  EMPTY,   FF  =  BUFFER  FULL) 
; OUTPUT  INTERRUPT  EXPECTED 
;    (0  =  NO  INTERRUPT  EXPECTED, 
J  FF  =  INTERRUPT  EXPECTED) 


SAMPLE  EXECUTION: 


ESCAPE 
TESTCH 

SCllB: 


LOOP: 


ASYNLP: 


; CHARACTER  EQUATES 
EQU  16H 
EQU  'A' 


CALL 


INIT 


S ASCI I  ESCAPE  CHARACTER 
;TEST  CHARACTER  =  A 


; INITIALIZE  PIO,    INTERRUPT  SYSTEM 


? SIMPLE  EXAMPLE  -  READ  AND  ECHO  CHARACTERS 
s  UNTIL  AN  ESC  IS  RECEIVED 


CALL 

PUSH 

CALL 

POP 

CP 

JR 


INCH 
AF 

OUTCH 
AF 

ESCAPE 
NZ , LOOP 


fREAD  CHARACTER 

sECHO  CHARACTER 

;IS  CHARACTER  AN  ESCAPE? 
jSTAY  IN  LOOP  IF  NOT 


;AN  ASYNCHRONOUS  EXAMPLE 

!  OUTPUT  "A"  TO  CONSOLE  CONTINUOUSLY,  BUT  ALSO  LOOK  AT 
!    INPUT  SIDE,   READING  AND  ECHOING  ANY  INPUT  CHARACTERS 

; OUTPUT  AN  "A"   IF  OUTPUT  IS  NOT  BUSY 
CALL        OUTST  j  IS  OUTPUT  BUSY? 

JR  C, ASYNLP  jJUMP  IF  IT  IS 

LD  A, TESTCH 

CALL        OUTCH  ; OUTPUT  TEST  CHARACTER 

! CHECK  INPUT  PORT 

lECHO  CHARACTER  IF  ONE  IS  AVAILABLE 
5  EX  IT  ON  ESCAPE  CHARACTER 

CALL         INST  I  IS  INPUT  DATA  AVAILABLE? 

JR  NC, ASYNLP  ; JUMP  IF  NOT  (SEND  ANOTHER  "A") 

CALL         INCH  J  GET  THE  CHARACTER 

CP  ESCAPE  5  IS  IT  AN  ESCAPE  CHARACTER? 
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JR  Z.ASDONE 
CALL  DUTCH 
JP  ASYNLP 


sJUMP  IF  IT  IS 
jELSE  ECHO  CHARACTER 
;AND  CONTINUE 


ASDONE: 

JP  LOOP 


END 


Buffered  Input/Output 
Using  an  SIO  (SINTB) 


11C 


Registers  Used: 

1.  INCH:  AF,  C,  DE,  HL 

2.  INST:  AF 

3.  DUTCH:  AF,  DE,  HL 

4.  OUTST:  AF 

5.  INIT:  AF,  BC,  HL,  I 
ExecuHon  Time: 

1.  INCH:  197  cycles  if  a  character  is  available 

2.  INST:  39  cycles 

3.  DUTCH:  240  cycles  if  the  output  buffer  is  not 
full  and  an  output  interrupt  is  expected;  160  addition- 
al cycles  to  send  the  data  to  the  SIO  if  no  output 
interrupt  is  expected. 

4.  OUTST:  34  cycles 

5.  INIT:  732  cycles 

6.  RDHDLR:  249  cycles 

7.  WRHDLR:  308  cycles 
Program  Size:  299  bytes 

Data  Memory  Required:  11  bytes  anywhere  in 
RAM  for  the  heads  and  tails  of  the  input  and  output 
buffers  (2  bytes  starting  at  addresses  IHEAD,  ITAIL, 
OHEAD,  and  OTAIL,  respectively),  the  numbers  of 
characters  in  the  buffers  (2  bytes  at  addresses  ICNT 
and  OCNT),  and  the  Output  Interrupt  Expected  flag 
(address  DIE).  This  does  not  include  the  actual  input 
and  output  buffers. 


Performs  interrupt-driven  input  and  output 
using  an  SIO  and  multiple-character  buffers. 
Consists  of  the  following  subroutines: 

1.  INCH  reads  a  character  from  the  input 
buffer. 

2.  INST  determines  whether  the  input  buffer 
is  empty. 

3.  OUTCH  writes  a  character  into  the  output 
buffer. 

4.  OUTST  determines  whether  the  output 
buffer  is  full. 

5.  INIT  initializes  the  buffers,  the  interrupt 
system,  and  the  SIO. 

The  actual  service  routines  are 

1 .  RDHDLR  responds  to  the  input  interrupt 
by  reading  a  character  from  the  SIO  into  the 
input  buffer. 

2.  W  R  H  DLR  responds  to  the  output  interrupt 
by  writing  a  character  from  the  output  buffer 
into  the  SIO. 

Procedures 

1.  INCH  waits  for  a  character  to  become 
available,  gets  the  character  from  the  head  of 
the  input  buffer,  moves  the  head  up  one  position, 
and  decreases  the  input  buffer  counter  by  1. 

2.  INST  clears  Carry  if  the  input  buffer 
counter  is  0  and  sets  it  otherwise. 

3.  OUTCH  waits  until  there  is  space  in  the 
output  buffer  (that  is,  until  the  output  buffer  is 
not  full),  stores  the  character  at  the  tail  of  the 
buffer,  moves  the  tail  up  one  position,  and  in- 
creases the  output  buffer  counter  by  1. 


4.  OUTST  sets  Carry  if  the  output  buffer 
counter  is  equal  to  the  buffer's  length  (i.e.,  if 
the  output  buffer  is  full)  and  clears  Carry  other- 
wise. 

5.  INIT  clears  the  buffer  counters,  sets  both 
the  heads  and  the  tails  of  the  buffers  to  their 
base  addresses,  sets  up  the  interrupt  vectors, 
and  initializes  the  SIO  by  storing  the  appropriate 
values  in  its  control  registers.  See  Subroutine 
lOE  for  more  details  about  initializing  SIOs. 
INIT  also  clears  the  Output  Interrupt  Expected 
flag,  indicating  that  the  SIO  is  initially  ready  to 
transmit  data. 
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6.  RDHDLR  reads  a  character  from  the 
SIO.  If  there  is  room  in  the  input  buffer,  it  stores 
the  character  at  the  tail  of  the  buffer,  moves 
the  tail  up  one  position,  and  increases  the  in- 
put buffer  counter  by  1.  If  the  buffer  is  full, 
RDHDLR  simply  discards  the  character. 

7.  WRHDLR  determines  whether  output 
data  is  available.  If  not,  it  simply  resets  the 
output  interrupt.  If  data  is  available,  WRHDLR 
obtains  a  character  from  the  head  of  the  output 
buffer,  moves  the  head  up  one  position,  and 
decreases  the  output  buffer  counter  by  1 . 

The  new  problem  with  multiple-character 
buffers  is  the  management  of  queues.  The  main 
program  must  read  the  data  in  the  order  in 
which  the  input  interrupt  service  routine  receives 
it.  Similarly,  the  output  interrupt  service  routine 
must  send  the  data  in  the  order  in  which  the 
main  program  stores  it.  Thus,  there  are  the 
following  requirements  for  handling  input: 

1.  The  main  program  must  know  whether 
the  input  buffer  is  empty. 

2.  If  the  input  buffer  is  not  empty,  the  main 
program  must  know  where  the  oldest  character 
is  (that  is,  the  one  that  was  received  first). 

.3.  The  input  interrupt  service  routine  must 
know  whether  the  input  buffer  is  full. 

4.  If  the  input  buffer  is  not  full,  the  interrupt 
service  routine  must  know  where  the  next 
empty  place  is  (that  is,  where  it  should  store  the 
new  character). 

The  output  interrupt  service  routine  and  the 
main  program  have  similar  requirements  for 
the  output  buffer,  although  the  roles  of  sender 
and  receiver  are  reversed. 

Requirements  I  and  3  are  met  by  maintaining 
a  counter  ICNT.  INIT  initializes  ICNT  to  0,  the 
interrupt  service  routine  adds  1  to  it  whenever  it 


receives  a  character  (assuming  the  buffer  is  not 
full),  and  the  main  program  subtracts  1  from  it 
whenever  it  removes  a  character  from  the 
buffer.  Thus,  the  main  program  can  determine 
whether  the  input  buffer  is  empty  by  checking  if 
ICNT  is  0.  Similarly,  the  interrupt  service  rou- 
tine can  determine  whether  the  input  buffer  is 
full  by  checking  if  ICNT  is  equal  to  the  size  of 
the  buffer. 

Requirements  2  and  4  are  met  by  maintain- 
ing two  pointers,  IHEAD  and  ITAIL,  defined 
as  follows: 

1.  ITAIL  contains  the  address  of  the  next 
empty  location  in  the  input  buffer. 

2.  IHEAD  contains  the  address  of  the  oldest 
character  in  the  input  buffer. 

INlT  initializes  IHEAD  and  ITAIL  to  the 
base  address  of  the  input  buffer.  Whenever  the 
interrupt  service  routine  receives  a  character,  it 
places  it  in  the  buffer  at  ITAIL  and  moves  ITAIL 
up  one  position  (assuming  that  the  buffer  is  not 
full).  Whenever  the  main  program  reads  a 
character,  it  removes  it  from  the  buffer  at 
IHEAD  and  moves  IHEAD  up  one  position. 
Thus,  IHEAD  "chases"  ITAIL  across  the  buffer 
with  the  service  routine  entering  characters  at 
one  end  (the  tail)  while  the  main  program 
removes  them  from  the  other  end  (the  head). 

The  occupied  part  of  the  buffer  could  thus 
start  and  end  anywhere.  If  either  IHEAD  or 
ITAIL  goes  beyond  the  end  of  the  buffer,  the 
program  simply  sets  it  back  to  the  buffer's  base 
address,  thus  providing  wraparound.  That  is, 
the  occupied  part  of  the  buffer  could  start  near 
the  end  (say,  at  byte  #195  of  a  200-byte  buffer) 
and  continue  back  past  the  beginning  (say,  to 
byte  #10).  Then  IHEAD  would  be  BASE+194, 
ITAIL  would  be  BASE+9,  and  the  buffer 
would  contain  15  characters  occupying  ad- 
dresses BASE-f-194  through  BASE+199  and 
BASE  through  BASE+8. 
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Entry  Conditions 


Exit  Conditions 


1.  INCH:  none 

2.  INST:  none 

3.  OUTCH:  character  to  transmit  in  A 

4.  OUTST:  none 

5.  INIT:  none 


1.  INCH:  character  in  A 

2.  INST:  Carry=  0  if  input  buffer  empty,  1  if 
otherwise 

3.  OUTCH:  none 

4.  OUTST:  Carry  =  0  if  output  buffer  not 
full,  1  if  full 

5.  INIT:  none 


Title 


Interrupt  input  and  output  using  a  Z80  SIO  and 
multiple-character  buffers 


Name: 
Purpose: 


SINTB 

This  program  consists  of  5  subroutines  which 
perforin  interrupt  driven  input  and  output  using 
a  Z80  SIO. 


Entry; 


INCH 

Read  a  character 
INST 

Determine  input  status  (whether  input 

buffer  is  empty) 
OUTCH 

Write  a  character 
OUTST 

Determine  output  status  (whether  output 
buffer  is  full) 
INIT 

Initialize  SIO  and  interrupt  system 

INCH 

No  parameters 
INST 

No  parameters 
OUTCH 

Register  A  =  character  to  transmit 
OUTST 

No  parameters 
INIT 

No  parameters 
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INCH 

Register  A  =  character 
INST 

Carry  =  0  if  input  buffer  is  empty, 
1  if  character  is  available 
DUTCH 

No  parameters 
OUTST 

Carry  =  0  if  output  buffer  is  not 
full.   1  if  it  is  full 
INIT 

No  parameters 

Reqisters  used:  INCH 

AF,C,DE,HL 
INST 

AF 
DUTCH 

AF.DE.HL 
DUTST 

AF 
INIT 

AF,BC.HL, I 

Time:  INCH 

Approximately  197  cycles  if  a  character  is 

aval lable 
INST 

39  cycles 
DUTCH 

Approximately  240  cycles  if  output  buffer 

is  not  full  and  output  interrupt  is  expected 
DUTST 

34  cycles 
INIT 

732  cycles 
RDHDLR 

Approximately  249  cycles 
WRHDLR 

Approximately  308  cycles 

Size;  Program  299  bytes 

Data  11  bytes  plus  size  of  buffers 


:SID  EQUATES 
I  SID  IS  PRDORAMMED  FOR: 
:     ASYNCHRONOUS  OPERATION 
;      16  X  BAUD  RATE 
J     8-BIT  CHARACTERS 
t     11/2  STOP  BITS 
; ARBITRARY  SIO  PORT  ADDRESSES 
SIOCAD    EQU  ICH  ?SIO  CHANNEL  A  DATA 


Exit: 


1 1C  BUFFERED  INPUT/OUTPUT  USING  AN  SIO  (SINTB)  41 


SIOCBD 

SI OCAS 

SIOCBS 

SIOIV 

SIOWV 

SIOEV 

SIORV 
SIOSV 


XNCHs 


INST! 


EQU 
EQU 
EQU 
EQU 
EQU 
EQU 

EQU 
EQU 


lEH 

IDH 

IFH 

8000H 

SlOIV+8 

SlOIV+10 

SIOIV+12 
SIOIV+14 


sREAD  CHARACTER 


CALL 

JR 

DI 

LD 

DEC 

LD 

LD 

CALL 

LD 

LD 

EI 

RET 


INST 
NC, INCH 

HL, ICNT 
(ML) 

HL,  (I  HE  AD) 
C, (HL> 
INCIPTR 
(IHEAD),HL 
A.C 


SIO  CHANNEL  B  DATA 
SIO  CHANNEL  A  COMMANDS/STATUS 
SIO  CHANNEL  B  COHMANDS/STATUS 
INTERRUPT  VECTOR 

SIO  CHANNEL  A  WRITE  INTERRUPT  VECTOR 
SIO  CHANNEL  A  EXTERNAL/STATUS 

INTERRUPT  VECTOR 
SIO  CHANNEL  A  READ  INTERRUPT  VECTOR 
SIO  CHANNEL  A  SPECIAL  RECEIVE 

INTERRUPT  VECTOR 


:GET  INPUT  STATUS 

;WAIT  IF  NO  CHARACTER  AVAILABLE 

J  DISABLE  INTERRUPTS 

5  REDUCE  INPUT  BUFFER  COUNT  BY  1 

sGET  CHARACTER  FROM  HEAD  OF  INPUT  BUFFER 

;MOVE  HEAD  POINTER  UP  1 


fREENABLE  INTERRUPTS 


; RETURN  INPUT  STATUS  (CARRY  =  1   IF  INPUT  DATA  IS  AVAILABLE) 


LD 

OR 

RET 

SCF 

RET 


A, (ICNT) 

A 

Z 


DUTCH: 


WAITOCs 


! WRITE  CHARACTER 
PUSH  AF 


jTEST  INPUT  BUFFER  COUNT 

! CLEAR  CARRY  ALWAYS 

! RETURN,   CARRY  =  0  IF  NO  DATA 

J  SET  CARRY 

{RETURN,  CARRY  =  1   IF  DATA  AVAILABLE 


;SAVE  CHARACTER  TO  OUTPUT 


JWAIT  FOR  OUTPUT  BUFFER  NOT  FULL,     THEN  STORE  NEXT  CHARACTER 


CALL 

OUTST 

!GET  OUTPUT  STATUS 

JR 

C.WAITOC 

;WAIT  IF  OUTPUT  BUFFER  IS  FULL 

DI 

J  DISABLE  INTERRUPTS  WHILE  LOOKING  AT 
;   BUFFER,    INTERRUPT  STATUS 

LD 

HL,OCNT 

INCREASE  OUTPUT  BUFFER  COUNT  BY  1 

INC 

(HL) 

LD 

HL, (OTAIL) 

; POINT  TO  NEXT  EMPTY  BYTE  IN  BUFFER 

POP 

AF 

sGET  CHARACTER 

LD 

(HL) , A 

! STORE  CHARACTER  AT  TAIL  OF  BUFFER 

CALL 

INCOPTR 

fMOVE  TAIL  POINTER  UP  i 

LD 

(OTAIL). HL 

LD 

A, (OIE) 

J  TEST  OUTPUT  INTERRUPT  EXPECTED  FLAG 

OR 

A 

CALL 

Z,OUTDAT 

J  OUTPUT  CHARACTER  IMMEDIATELY  IF 

OUTPUT  INTERRUPT  NOT  EXPECTED 
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EI  jREENAELE  INTERRUPTS 
RET 

; OUTPUT  STATUS  (CARRY  =  1   IF  BUFFER  IS  FULL) 

OUTST: 

LD            A, (OCNT)  jOET  CURRENT  OUTPUT  BUFFER  COUNT 

CP            SZOBUF  : COMPARE  TO  MAXIMUM 

CCF  ; COMPLEMENT  CARRY 

RET  5 CARRY  =  1  IF  BUFFER  FULL,   0  IF  NOT 

; INITIALIZE  SIO,  INTERRUPT  SYSTEM 

INIT: 

DI  : DISABLE  INTERRUPTS 


S INITIALIZE  BUFFER  COUNTERS  AND  POINTERS,    INTERRUPT  FLAG 


SUB 

A 

LD 

COIE),A 

5  INDICATE  NO  OUTPUT  INTERRUPTS 

LD 

CICNT) ,A 

; BUFFER  COUNTERS  =  0 

LD 

(OCNT) .A 

LD 

HL, IBUF 

SALL  BUFFER  POINTERS  =  BASE  ADDRESS 

LD 

(IHEAD) ,HL 

LD 

(ITAIL),HL 

LD 

HL.OBUF 

LD 

(OHEAD),HL 

LD 

(OTAIDrHL 

! INITIALIZE  INTERRUPT 

VECTORS 

LD 

A,SIOIV  SHR  8 

;GET  HIGH  BYTE  OF  INTERRUPT  PAGE 

LD 

I, A 

;SET  INTERRUPT  VECTOR  IN  ZSO 

IM 

2 

! INTERRUPT  MODE  2  -  VECTORS  IN  TABLE 

LD 

HL.RDHDLR 

:   ON  INTERRUPT  PAGE 

LD 

(SIORV),HL 

! STORE  READ  VECTOR 

LD 

HL.WRHDLR 

LD 

CSIOWV) ,HL 

! STORE  WRITE  VECTOR 

LD 

HLrEXHDLR 

LD 

(SIOEV),HL 

; STORE  EXTERNAL/STATUS  VECTOR 

LD 

HL,REHDLR 

LD 

(SIOSV).HL 

8  STORE  SPECIAL  RECEIVE  VECTOR 

; INITIALIZE  I/O  PORTS 

LD  HL.SIOINT  fBASE  ADDRESS  OF  INITIALIZATION  ARRAY 

CALL         IPORTS  ? INITIALIZE  SIO 

EI  J  ENABLE  INTERRUPTS 

RET 


RDl: 


; INPUT 

(READ)  INTERRUPT 

HANDLER 

PUSH 

AF 

;SAVE  REGISTERS 

PUSH 

BC 

PUSH 

DE 

PUSH 

HL 

IN 

A, (SIOCAD) 

?READ  DATA  FROM  SIO 

LD 

C,A 

!SAVE  DATA  IN  REGISTER  C 

LD 

HL, ICNT 

5 ANY  ROOM  IN  INPUT  BUFFER? 
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LD 

CP 

JR 

INC 

LD 

LD 

CALL 
LD 


A, (HL) 
SZIBUF 
NC.XITRH 
(HL) 

HL, (ITAIL) 
(HL),C 
INCIPTR 
(ITAIL), HL 


sJUMP  IF  NO  ROOM 

; INCREMENT  INPUT  BUFFER  COUNTER 

; STORE  CHARACTER  AT  TAIL  OF  INPUT  BUFFER 

; INCREMENT  TAIL  POINTER 


XITRHs 


POP 
POP 
POP 
POP 
EI 

RETl 


HL 
DE 
BC 
AF 


: RESTORE  REGISTERS 


jREENAELE  INTERRUPTS 


WRHDLR: 


; OUTPUT  (WRITE)   INTERRUPT  HANDLER 

PUSH  AF  {SAVE  REGISTERS 

PUSH  BC 

PUSH  DE 

PUSH  HL 


LD 
OR 
JR 

CALL 
JR 


A, (OCNT) 
A 

Z , NODATA 

OUTDAT 

WRDONE 


sGET  OUTPUT  BUFFER  COUNTER 
jTEST  FOR  EMPTY  BUFFER 
;JUMP  IF  NO  DATA  TO  TRANSMIT 
sELSE  OUTPUT  DATA 


?IF  AN  OUTPUT  INTERRUPT  OCCURS  WHEN  NO  DATA  IS  AVAILABLE. 
;   WE  MUST  DISABLE  OUTPUT  INTERRUPTS  TO  AVOID  AN  ENDLESS  LOOP. 
!   WHEN  THE  NEXT  CHARACTER  IS  READY,    IT  MUST  BE  SENT  IMMEDIATELY 
;   SINCE  NO  INTERRUPT  WILL  OCCUR.     THIS  STATE  IN  WHICH  AN  OUTPUT 
;    INTERRUPT  HAS  OCCURRED  BUT  HAS  NOT  BEEN  SERVICED  IS  INDICATED 
;   BY  CLEARING  OIE  (OUTPUT  INTERRUPT  EXPECTED  FLAG). 

NODATA: 

SUB  A 

LD  (OIE), A  ;D0  NOT  EXPECT  AN  INTERRUPT 

OUT  (SIOCAS),A  ? SELECT  REGISTER  0 

LD  A,00101000B  ; RESET  TRANSMITTER  INTERRUPT 

OUT  (SIOCAS),A 


WRDONE: 

POP  HL  ? RESTORE  REGISTERS 

POP  DE 

POP  BC 

POP  AF 

EI 

RET  I 


f EXTERNAL/STATUS  CHANGED  INTERRUPT  HANDLER 

EXHDLR: 

PUSH  AF 

LD  A,00010000B  j RESET  STATUS  INTERRUPT 
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OUT 
POP 
EI 

RET  I 


(SIOCAS}.A 
AF 


sDCD  OR  CTS  LINE  CHANGED  STATE.  OR 
J  BREAK  WAS  DETECTED 
{SERVICE  HERE  IF  NECESSARY 


REHDLR: 


{SPECIAL  RECEIVE  ERROR  INTERRUPT 


PUSH 

LD 

OUT 

POP 

EI 

RET  I 


AF 

A.OOllOOOOB 

(SIOCAS).A 

AF 


5 RESET  RECEIVE  ERROR  INTERRUPT 


; FRAMING  ERROR  OR  OVERRUN  ERROR  OCCURRED 
!  SERVICE  HERE  IF  NECESSARY 


; ROUTINE:  OUTDAT 

! PURPOSE:   SEND  CHARACTER  TO  SIO 

SENTRY:  NONE 

sEXIT:  NONE 

5 REGISTERS  USED:  AF,DE,HL 

OUTDAT: 


LD 

HL, tOHEAD) 

LD 

A, (HL) 

;GET  DATA  FROM  HEAD  OF  OUTPUT  BUFFER 

OUT 

(SIOCAD) . A 

! OUTPUT  DATA 

CALL 

INCOPTR 

S INCREMENT  HEAD  POINTER 

LD 

(OHEAD),HL 

LD 

HL,OCNT 

! DECREMENT  OUTPUT  BUFFER  COUNT 

DEC 

tHL) 

LD 

A,OFFH 

LD 

(OIE),A 

? EXPECT  AN  OUTPUT  JNTERRUPT 

RET 

; ROUTINE:  INCIPTR 

5 PURPOSE!    INCREMENT  POINTER  INTO  INPUT 
s  BUFFER  WITH  WRAPAROUND 

J  ENTRY:   HL  =  POINTER 

sEXIT:  HL  =  POINTER  INCREMENTED  WITH  WRAPAROUND 
J  REGISTERS  USED:  AF,DE,HL 

INCIPTR: 


INC 

HL 

! INCREMENT  POINTER 

LD 

DE.EIBUF 

; COMPARE  POINTER,  END 

OF  BUFFER 

LD 

A,L 

CP 

E 

RET 

NZ 

LD 

A,H 

CP 

D 

RET 

NZ 

! RETURN  IF  NOT  EQUAL 

LD 

HL, IBUF 

!IF  POINTER  AT  END  OF 

BUFFER, 

RET 

!   SET  IT  BACK  TO  BASE 

ADDRESS 
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; ROUTINES  INCOPTR 

? PURPOSE:    INCREMENT  POINTER  INTO  OUTPUT 


INCOPTR: 


BUFFER 

WITH 

WRAPAROUND 

•ENTRY: 

HL  =  POINTER 

SEXIT: 

HL  =  POINTER 

INCREMENTED  WITH  WRAPAROUND 

; REGISTERS  USED: 

AF,DE,HL 

INC 

HL 

(INCREMENT  POINTER 

LD 

DE,EOEUF 

(COMPARE  POINTER,   END  OF  BUFFER 

LD 

A.L 

CP 

E 

RET 

NZ 

LD 

A.H 

CP 

0 

RET 

NZ 

LD 

HL,OBUF 

?IF  POINTER  AT  END  OF  BUFFER, 

RET 

!   SET  IT  BACK  TO  BASE  ADDRESS 

IPORTS 


! ROUTINE:  IPORTS 

(PURPOSE:    INITIALIZE  I/O  PORTS 

?ENTRYs   HL  =  BASE  ADDRESS  OF  INITIALIZATION  ARRAY 
?EXIT:     DATA  OUTPUT  TO  PORTS 
? REG I STEPS  USED:  AF.BC.HL 

(GET  NUMBER  OF  DATA  BYTES  TO  SEND  TO  CURRENT  PORT 
(EXIT  IF  NUMBER  OF  BYTES  IS  0.    INDICATING  TERMINATOR 
LD  A, (HL)  (GET  NUMBER  OF  BYTES 

OR  A  (TEST  FOR  ZERO  (TERMINATOR) 

RET  Z  (RETURN  IF  NUMBER  OF  BYTES  =  0 

LD  B,  A 

INC  HL  (POINT  TO  PORT  ADDRESS  (NEXT  BYTE) 


(C  =  PORT  ADDRESS 

sHL  =  BASE  ADDRESS  OF  OUTPUT  DATA 

LD  C, (HL)  (GET  PORT  ADDRESS 

INC  HL  (POINT  TO  FIRST  DATA  VALUE  (NEXT  BYTE) 

(OUTPUT  DATA  AND  CONTINUE  TO  NEXT  PORT 

OTIR  (SEND  DATA  VALUES  TO  PORT 

JR  IPORTS  (CONTINUE  TO  NEXT  PORT  ENTRY 

(SIO  INITIALIZATION  DATA 

SIOINT: 

(RESET  CHANNEL  A 

DB  1  (OUTPUT  1  BYTE 

DB  SI OCAS  (TO  CHANNEL  A  COMMAND/STATUS 

DB  OOOllOOOE  (SELECT  WRITE  REGISTER  0 

(BITS  2,1.0  =  0  (WRITE  REGISTER  0) 
(BITS  5,4,3  =  Oil   (CHANNEL  RESET) 
(BITS  7,6  =  0  (DO  NOT  CARE) 
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J  SET  INTERRUPT  VECTOR  AND  ALLOW  STATUS  TO  AFFECT  IT 


I HEAD: 

ITAlLi 

ICNTs 
OHEAD: 


DB 
DB 
OB 
DB 
DB 
DB 


4 


{OUTPUT  2  BYTES 


SIOCBS  f DESTINATION  IS  COMMAND  REGISTER  B 

0000001 OB  ; SELECT  WRITE  REGISTER  2 

SIOIV  AND  OFFH  ; SET  INTERRUPT  VECTOR  FOR  SIO 

00000001 B  ! SELECT  WRITE  REGISTER  1 

000001 OOB  jTURN  ON  STATUS  AFFECTS  VECTOR 


! INITIALIZE  CHANNEL  A 

DB  8 

DB  SI OCAS 


s OUTPUT  8  BYTES 

; DESTINATION  IS  COMMAND  REGISTER  A 


? INITIALIZE  BAUD  RATE  CONTROL 

DB  0001 01 OOB  ! SELECT  WRITE  REGISTER  4 

t   RESET  EXTERNAL/STATUS  INTERRUPT 

DB  OlOOlOOOB  sBIT  0  =  0  (NO  PARITY) 

;BIT  1  =0  (DON'T  CARE) 
jBltS  3,2  =  10  (1   1/2  STOP  BITS) 
!BITS  5.4  =  00  (DON'T  CARE) 
sBITS  7,6  =  01   (16  TIMES  CLOCK) 

{INITIALIZE  RECEIVE  CONTROL 

DB  0000001 IB  {SELECT  WRITE  REGISTER  3 

DB  IIOOOOOIB  {BIT  0  =  1   (RECEIVE  ENABLE) 

{BITS  4,3,2,1  =  0  (DON'T  CARE) 

{BIT  5  =  0  (NO  AUTO  ENABLE) 

{BIT  7,6  =  11   (RECEIVE  8  BITS/CHAR) 

{INITIALIZE  TRANSMIT  CONTROL 


DB 
DB 


OOOOOIOIB 
UIOIOIOB 


DB 
DB 


0000000 IB 
0001 101  IB 


DB  0 

{DATA  SECTION 
DS  2 


{SELECT  WRITE  REGISTER  5 
{BIT  0  =  0  (NO  CRC  ON  TRANSMIT) 
{BIT  1  =  1   (REQUEST  TO  SEND) 
{BIT  2=0  (DON'T  CARE) 
{BIT  3  =  1   (TRANSMIT  ENABLE) 
{BIT  4  =  0  (DO  NOT  SEND  BREAK) 
{BITS  6,5  =  11   (TRANSMIT  8  BITS/CHAR) 
{BIT  7  =  1    (DATA  TERMINAL  READY) 
{SELECT  WRITE  REGISTER  1 
{BIT  0  =  1   (EXTERNAL  INTERRUPTS) 
{BIT  1  =  1   (ENABLE  TRANSMIT  INTERRUPT) 
{BIT  2  =  0  (DO  NOT  CARE) 
{BITS  4.3  =  11   (RECEIVE  INTERRUPTS  ON 
{   ALL  CHARS, 
{  VECTOR) 
{BITS  7.6.5  = 
{  FUNCTION) 
{END  OF  TABLE 


PARITY  DOES  NOT  AFFECT 
=  000  (NO  WAIT/READY 


DS 

DS 
DS 


1 

2 


{ADDRESS  OF  OLDEST  CHARACTER  IN  INPUT 
{  BUFFER 

{ADDRESS  OF  NEWEST  CHARACTER  IN  INPUT 
{  BUFFER 

{NUMBER  OF  CHARACTERS  IN  INPUT  BUFFER 
{ADDRESS  OF  OLDEST  CHARACTER  IN  OUTPUT 
{  BUFFER 
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OTAIL:  DS 


OCNTs 
OIEs 


SZIBUF 

IBUFs 

EIBUF 

SZOBUF 

OBUF: 

EOBUF 


DS 
DS 


EQU 

DS 

EQU 

EQU 

DS 

EQU 


1 

SZIBUF 
* 

255 

SZOBUF 
$ 


ADDRESS  OF  NEWEST  CHARACTER  IN  OUTPUT 
BUFFER 

NUMBER  OF  CHARACTERS  IN  OUTPUT  BUFFER 
OUTPUT  INTERRUPT  EXPECTED 

(0  =  NO  INTERRUPT  EXPECTED, 

FF  =  INTERRUPT  EXPECTED) 
SIZE  OF  INPUT  BUFFER 
INPUT  BUFFER 
END  OF  INPUT  BUFFER 
SIZE  OF  OUTPUT  BUFFER 
OUTPUT  BUFFER 
END  OF  OUTPUT  BUFFER 


SAMPLE  EXECUTION! 


ESCAPE 
TESTCH 

SCUC: 


LOOP: 


ASYNLP: 


5  CHARACTER  EQUATES 
EQU  IBH 
EQU  'A' 


CALL 


INIT 


5 ASCII  ESCAPE  CHARACTER 
?TEST  CHARACTER  =  A 


{INITIALIZE  SIO,   INTERRUPT  SYSTEM 


! SIMPLE  EXAMPLE  -  READ  AND  ECHO  CHARACTER 
J  UNTIL  AN  ESC  IS  -RECEIVED 


CALL 

PUSH 

CALL 

POP 

CP 

JR 


INCH 
AF 

DUTCH 
AF 

ESCAPE 
NZ.LOOP 


jREAD  CHARACTER 

;ECHO  CHARACTER 

5  IS  CHARACTER  AN  ESCAPE? 
;STAY  IN  LOOP  IF  NOT 


J  AN  ASYNCHRONOUS  EXAMPLE 

!  OUTPUT  "A"  TO  CONSOLE  CONTINUOUSLY  BUT  ALSO  LOOK  AT 
!    INPUT  SIDE,   READING  AND  ECHOING  ANY  INPUT  CHARACTERS 

5 OUTPUT  AN  "A"  IF  OUTPUT  IS  NOT  BUSY 
CALL        OUTST  s IS  OUTPUT  BUSY? 

JR  C, ASYNLP  jJUMP  IF  IT  IS 

LD  A. TESTCH 

CALL        DUTCH  ; OUTPUT  CHARACTER 


; CHECK  INPUT  PORT 

jECHO  CHARACTER  IF  ONE  IS  AVAILABLE 
sEXIT  ON  ESCAPE  CHARACTER 


CALL 
JR 

CALL 

CP 

JR 


INST 

NC, ASYNLP 
INCH 
ESCAPE 
Z,DONE 


fIS  INPUT  DATA  AVAILABLE? 
jJUMP  IF  NOT  <SEND  ANOTHER  ' 
sGET  CHARACTER 
J  IS  IT  AN  ESCAPE  CHARACTER? 
; BRANCH  IF  IT  IS 


A"> 
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DONE: 


CALL 
JP 


JP 
END 


DUTCH 
ASYNLP 


LOOP 


jELSE  ECHO  CHARACTER 
;AND  CONTINUE 


Real-Time  Clock  and  Calendar  (CLOCK)     1 1 D 


Registers  Used: 

1.  CLOCK:  HL 

2.  ICLK:  AF,HL,I 

3.  CLKINT:  None 
Execution  Time: 

1.  CLOCK:  20  cycles 

2.  ICLK:  251  cycles 

3.  CLKINT:  93  cycles  if  only  T  ICK  must  be  dec- 
remented; 498  cycles  maximum  if  changing  to  a  new 
year. 

Program  Size:  171  bytes 

Dorta  Memoiy  Required:  8  bytes  for  the  clock  vari- 
ables starting  at  address  CLKVAR 


M  aintains  a  titne-of-day  24-hour  clock  and 
a  calendar  based  on  a  real-time  clock  interrupt 
generated  from  a  Z80  CTC.  Consists  of  the 
following  subroutines: 

1.  CLOCK  returns  the  base  address  of  the 
clock  variables. 

2.  ICLK  initializes  the  clock  interrupt  and 
the  clock  variables. 

3.  CLKINT  updates  the  clock  after  each 
interrupt  (assumed  to  be  spaced  one  tick  apart). 

Procedures 

1.  CLOCK  loads  the  base  address  of  the 
clock  variables  into  register  pair  HL.  The  clock 
variables  are  stored  in  the  following  order 
(lowest  address  first):  ticks,  seconds,  minutes, 
hours,  days,  months,  less  significant  byte  of 
year,  more  significant  byte  of  year. 

2.  ICLK  initializes  the  CTC,  the  interrupt 
system,  and  the  clock  variables.  The  arbitrary 
starting  time  is  00:00:00,  January  1 , 1980.  A  real 
application  would  clearly  require  some  kind  of 
outside  intervention  to  load  or  change  the 
clock. 

3.  CLKINT  decrements  the  remaining  tick 
count  by  1  and  updates  the  rest  of  the  clock  if 
necessary.  Of  course,  the  number  of  seconds 
and  minutes  must  be  less  than  60  and  the 


Entry  Conditions 

1.  CLOCK;  none 

2.  ICLK:  none 

3.  CLKINT:  none 


number  of  hours  must  be  less  than  24.  The  day 
of  the  month  must  be  less  than  or  equal  to  the 
last  day  for  the  current  month;  an  array  of  the 
last  days  of  each  month  begins  at  address 
LASTDY.  If  the  month  is  February  (#2),  the 
program  checks  if  the  current  year  is  a  leap  year. 
This  involves  determining  whether  the  two  least 
significant  bits  of  memory  location  YEAR  are 
both  Os.  If  the  current  year  is  a  leap  year,  the  last 
day  of  February  is  the  29th,  not  the  28th.  The 
month  number  may  not  exceed  12  (December) 
or  a  carry  to  the  year  number  is  necessary.  The 
program  must  reinitialize  the  variables  properly 
when  carries  occur;  that  is,  TICK  to  DTICK;  sec- 
onds, minutes,  and  hours  to  0;  day  and  month 
to  1  (meaning  the  first  day  and  January,  respec- 
tively). 


Exit  Conditions 

1 .  CLOCK:  base  address  of  clock  variables  in 
HL 

2.  ICLK:  none 

3.  CLKINT:  none 
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Examples 

These  examples  assume  that  the  tick  rate  is 
DTICK  Hz  (less  than  256  Hz  -  typical  values 
would  be  60  Hz  or  100  Hz)  and  that  the  clock 
and  calendar  are  saved  in  memory  locations: 


TICK  ticks  before  a  carry,  counted  down 

from  DTICK 

SEC  seconds  (0  to  59) 

MIN  minutes  (0  to  59) 

HOUR  hour  of  day  (0  to  23) 

DAY  day  of  month  (1  to  28,  29,  .30,  or  31) 

MONTH  month  of  year  (1  through  12) 

YEAR  and  current  year 


YEAR+I 


I .  Data: 

March  7,  1982,  11:59.59  p  m  and  1  tick  left 
(TICK)  =  1    (SEC)  =  .59        (DAY)  =  07 

(MIN)  =59  (MONTH)  =  03 
(HOUR)  =23     (YEAR)  =1982 


Result: 

March  8,  1982,  12:00.00  a  m  and  DTICK  ticks 
(TICK)  =  DTICK    (SEC)  =  0       (DAY)  =  08 

(MIN)  =  0  (MONTH)  =  03 
(HOUR)  =  0    (YEAR)  =1982 


2.  Data: 

Dec.  31,  1982,  11:59..59  p.m  and  1  tick  left 
(TICK)  =  1    (SEC)  =  59         (DAY)  =  31 

(MIN)  =  59  (MONTH)  =  12 
(HOUR)  =  23     (YEAR)  =  1982 


Result: 

Jan.  I,  1983,  12:00.00  a.m. /and  DTICK  ticks 
(TICK)  =  DTICK    (SEC)  =  0     (DAY)  =  1 

(MIN)  =  0  (MONTH)  =  I 
(HOUR)  =  0  (YEAR)  =  1 


Title  Real-time  clock  and  calendar 

Names  CLOCK 


Purposes  This  program  maintains  a  time-of-day  24-hour 

clock  and  a  calendar  based  on  a  real-time  clock 
interrupt  from  a  Z80  CTC. 

CLOCK 

Returns  base  address  of  clock  variables 
ICLK 

Initializes  CTC  and  clock  interrupt 
CLKINT 

Updates  clock  variables  for  each  tick 

Entry s  CLOCK 
None 
ICLK 
None 


Exit! 


CLOCK 
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Registers  used: 


Time: 


Size: 


Register  HL  =  Base  address  of  time  variables 
ICLK 
None 

CLOCK 

HL 
ICLK 

AF,HL, I 
CLKINT 

None 

CLOCK 

20  cycles 
ICLK 

251  cycles 
CLKINT 

93  cycles  normally  if  decrementing  tick 
493  cycles  maximum  if  changing  to  a  new  year 

Program  171  bytes 
Data  8  bytes 


! ARBITRARY  PORT  ADDRESSES  FOR  Z80  CTC 


CTCCHO  EQU 
CTCITRP  EQU 
CTCCMD  EQU 


CTCTC 


EQU 


80H 

OSOOOH 

lOlOOlllB 


250 


fCTC  CHANNEL  0  PORT 
fCTC  INTERRUPT  ADDRESS 


iBIT  7  = 
(BIT  6  = 
(BIT  5  = 
(BIT  4  = 
(BIT  3  = 
(Bit  2  = 
(BIT  1  = 
(BIT  0  = 


1  INTERRUPTS  ENABLED 

0  TIMER  MODE 

1  256  COUNT  PRESCALER 

0  NEGATIVE  EDGE  TRIGGER 

0  START  TIMER  AFTER  TIME  CONST 

1  TIME  CONSTANT  FOLLOWS 
1  RESET  CHANNEL 

1  CONTROL  WORD 


[TIME  CONSTANT 


DFLTS: 
DTICK 


CLOCK: 


ICLK: 


s CALCULATION  FOR  TICK 

!   ASSUME  A  4  MHZ  CLOCK  FOR  CTC  WITH  PRESCALER  =  256 
!       AND  COUNT  =  250  =  (4  «  10''6>  /   (256  »  250) 
;       IS  ABOUT  62  TICKS  PER  SECOND 

EQU  62  ; DEFAULT  TICK 

! RETURN  BASE  ADDRESS  OF  CLOCK  VARIABLES 

LD  HL,CLKVAR  : GET  BASE  ADDRESS  OF  CLOCK  VARIABLES 

RET 

SINITIALIZE  CTC  CHANNEL  0  AS  A  REAL-TIME  CLOCK  INTERRUPT 

! DISABLE  INTERRUPTS 


DI 
LD 
LD 
IM 


A, CTCITRP  SHR  S 
I,  A 
2 


!SET  UP  INTERRUPT  VECTOR 

J  SET  INTERRUPT  MODE  2  -  VECTORS  IN 

;   TABLE  ON  INTERRUPT  PAGE 
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LD  HL.CLKINT 

LD  (CTCITRP),HL         ?SET  INTERRUPT  ADDRESS 

LD  A.  1 

OUT  (CTCCHO),A  j DISABLE  CHANNEL  0 

LD  A.CTCITRP  AND  OFFH  sLOW  BYTE  OF  CTC  INTERRUPT 

OUT  tCTCCHOJ.A  ; VECTOR  TO  CTC 

LD  A.CTCCMD 

OUT  <CTCCHO),A  ; OUTPUT  CTC  COMMAND 

LD  A.CTCTC 

OUT  (CTCCHO),A  ; OUTPUT  TIME  CONSTANT 

INITIALIZE  CLOCK  VARIABLES  TO  ARBITRARY  VALUE 
: JANUARY  1.    1980  00:00.00 

;A  REAL  CLOCK  WOULD  NEED  OUTSIDE  INTERVENTION 


!  TO 

SET  OR  CHANGE 

VALUES 

LD 

HL,TICK 

LD 

(HD.DTICK 

: INITIALIZE  TICKS 

INC 

HL 

SUB 

A 

LD 

(HL>,A 

; SECOND  =  0 

INC 

HL 

LD 

(HL),A 

! MINUTE  =  0 

INC 

HL 

LD 

(HL).A 

sHOUR  =  0 

INC 

A 

;A  =  1 

INC 

HL 

LD 

(HL) ,A 

jDAY  =  1  (FIRST) 

INC 

HL 

LD 

(HL) , A 

? MONTH  =  1  (JANUARY) 

LD 

HL. 1980 

LD 

(YEAR) ,HL 

jYEAR  =  19S0 

EI 

RET 

! HANDLE  CLOCK  INTERRUPT 


CLKINT: 


PUSH 

PUSH 

LD 

DEC 

JR 

LD 

PUSH 
PUSH 

LD 


AF 
HL 

HL,TICK 
(HL) 

NZ,EXIT1 
(HL),DTICK 

BC 
DE 

B,0 


INCREMENT  SECONDS 

INC  HL 

INC  (HL) 

LD  A, (HL) 

CP  60 

JR  CEXITO 


?SAVE  AF.HL 

; DECREMENT  TICK  COUNT 

;JUMP  IF  TICK  NOT  ZERO 

;SET  TICK  COUNT  BACK  TO  DEFAULT 

sSAVE  BCDE 

;0  =  DEFAULT  FOR  SECONDS,   MINUTES,  HOURS 


! POINT  AT  SECONDS 

: INCREMENT  TO  NEXT  SECOND 

: SECONDS  =  60? 

sEXIT  IF  LESS  THAN  60  SECONDS 
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LD 

(HL) ,B 

SELSE  SECONDS  =  0 

; INCREMENT  MINUTES 

INC 

HL 

! POINT  AT  MINUTES 

INC 

(HL) 

; INCREMENT  TO  NEXT  MINUTE 

LD 

A, (HL) 

CP 

60 

! MINUTES  =  60? 

JR 

CEXITO 

;EXIT  IF  LESS  THAN  60  MINUTES 

LD 

(HL).B 

_  r-i  OCT    MTKIIITCO    A 

S INCREMENT  HOUR 

INC 

HL 

: POINT  AT  HOUR 

INC 

(HL) 

INCREMENT  TO  NEXT  HOUR 

LD 

A, (HL) 

CP 

24 

s HOURS  =  24? 

JR 

CEXITO 

;EXIT  IF  LESS  THAN  24  HOURS 

LD 

(HL) ,B 

:ELSE  HOUR  =  0 

; INCREMENT  DAY 

EX 

DE.HL 

;SAVE  ADDRESS  OF  HOUR 

LD 

HL,LASTDY-1 

LD 

A, (MONTH) 

sGET  CURRENT  MONTH 

LD 

C,A 

J  REGISTER  C  =  MONTH 

LD 

B.O 

ADD 

HL.BC 

J  POINT  AT  LAST  DAY  OF  MONTH 

EX 

DE,HL 

f RESTORE  ADDRESS  OF  HOUR 

INC 

HL 

! POINT  AT  DAY 

LD 

A, (HL) 

;GET  CURRENT  DAY 

INC 

(HL) 

s INCREMENT  TO  NEXT  DAY 

EX 

DE,HL 

;DE  =  ADDRESS  OF  DAY 

LD 

B,A 

J  REGISTER  B  =  DAY 

CP 

(HL) 

sIS  CURRENT  DAY  END  OF  MONTH? 

EX 

DE,HL 

fHL  =  ADDRESS  OF  DAY 

JR 

CEXITO 

;EXIT  IF  NOT  AT  END  OF  MONTH 

; DETERMINE  IF  THIS 

IS  END  OF  FEBRUARY  IN  A  LEAP 

;  YEAR 

(YEAR  DIVISIBLE  BY  4) 

LD 

A,C 

;GET  MONTH 

CP 

2 

; IS  THIS  FEBRUARY? 

JR 

NZ, INCMTH 

sJUMP  IF  NOT.    INCREMENT  MONTH 

LD 

A, (YEAR) 

;IS  IT  A  LEAP  YEAR? 

AND 

0000001  IB 

JR 

NZ, INCMTH 

;JUMP  IF  NOT 

s FEBRUARY  OF  A  LEAP 

YEAR  HAS  29  DAYS.   NOT  28  DAYS 

LD 

A,B 

;GET  DAY 

CP 

29 

JR 

CEXITO 

jEXIT  IF  NOT  1ST  OF  MARCH 

LD 

B,  1 

; DEFAULT  IS  1  FOR  DAY  AND  MONT 

LD 

(HL),B 

!DAY  =  1 

INC 

HL 

INC 

(HL) 

: INCREMENT  MONTH 

LD 

A,C 

;GET  OLD  MONTH 
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CP 

12 

J  WAS  OLD  MONTH  DECEMBER? 

JR 

NCrEXITO 

5  EX  IT    IF  NOT 

LD 

(HL),B 

r-i  i;--r— 

;    L-rlAiNUb  nUN  I  n    lU   I  (.UANUAnYJ 

! INCREMENT  YEAR 

LD 

HL, (YEAR) 

INC 

HL 

LD 

(YEAR).HL 

c.aI  to: 

; RESTORE  REGISTERS 

POP 

DE 

! RESTORE  BC.DE 

POP 

BC 

EXIT  1 : 

POP 

HL 

m  OCC-XT^OCT     III  ATT 

POP 

AF 

EI 

>  ntc.iNAl5L.t    1  IN  1  tKKUr  1  o 

RET  I 

IDKI 

" nc 1 UKN 

:  ARRAY 

OF  LAST  DAYS  OF 

t AlwH  nUN  1  H 

LASTDY: 

DB 

31 

: JANUARY 

OB 

28 

; FEBRUARY  (EXCEPT  LEAP  YEARS) 

DB 

31 

! MARCH 

DB 

30 

; APR I L 

DB 

31 

%  MAY 

DB 

30 

!  JUNE 

DB 

31 

!  JULY 

DB 

31 

! AUGUST 

DB 

30 

: SEPTEMBER 

DB 

31 

t OCTOBER 

DB 

30 

: NOVEMBER 

DB 

31 

; DECEMBER 

! CLOCK 

VARIABLES 

CLKVAR: 

TICK! 

DS 

J  TICKS  LEFT  IN  CURRENT  SECOND 

SEC: 

DS 

? SECONDS  (0  TO  59) 

NIN: 

DS 

S MINUTES  (0  TO  59) 

HOUR : 

DS 

■  LJl~ll  IDO      /  /"v     Til     -"^O  \ 

UH  Y  s 

DS 

MONTH: 

DS 

; MONTH  1= JANUARY  ..  12=DECEMBER 

YEAR: 

DS 

2 

;  YEAR 

SAMPLE 

EXECUTION 

! CLOCK 

VARIABLE  INDEXES 

TCKIDX 

EQLI 

0 

} INDEX  TO  TICK 
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SECIDX 

EQU 

1 

; INDEX  TO  SECOND 

MINIDX 

ESU 

2 

; INDEX  TO  MINUTE 

HRIDX 

EQU 

3 

; INDEX  TO  HOUR 

DAYIDX 

EQU 

4 

? INDEX  TO  DAY 

MTHIDX 

EQU 

5 

: INDEX  TO  MONTH 

YRIDX 

EQU 

6 

; INDEX  TO  YEAR 

SCllD: 

CALL 

ICLK 

{INITIALIZE  CLOCK 

INITIALIZE  CLOCK  TO  2/7/83  14500SOO  (2  PM.   FEB.   7,  1983) 


CALL 

CLOCK 

sHL  =  BASE  ADDRESS  OF  ( 

DI 

PUSH 

HL 

POP 

IX 

?IX  =  ADDRESS  OF  TICKS 

LD 

(IX+SECIDX) ,0 

; SECONDS  =  0 

LD 

(IX+MINIDX),0 

! MINUTES  =  0 

LD 

(IX+HRIDX) , 14 

fHOUR  =  14  (2  PM) 

LD 

(IX+DAYIDX).7 

sDAY  =  7 

LD 

<IX+MTHIDX),2 

5 MONTH  =  2  (FEBRUARY) 

LD 

HL. 1983 

LD 

(IX+YRIDX) ,L 

J  YEAR  =  1983 

LD 

(IX+YRIDX+1) ,H 

EI 

?WAIT  FOR  CLOCK  TO  BE  2/7/83  14S01S20  (2:01.20  PM,  FEB. 7,  1983) 
jIX  =  BASE  ADDRESS  OF  CLOCK  VARIABLES 

sNOTE:     MUST  BE  CAREFUL  TO  EXIT  IF  CLOCK  IS  ACCIDENTALLY 
;  SET  AHEAD,     IF  WE  CHECK  ONLY  FOR  EQUALITY,   WE  MIGHT  NEVER 
J  FIND  IT.     THUS  WE  HAVE  >=  IN  TESTS  BELOW,   NOT  JUST  =. 


WAITYR; 


:WAIT 

FOR  YEAR  >=  1983 

LD 

DE, 1983 

DI 

; DISABLE  INTERRUPTS  TO  LOAD 

LD 

H, (IX+YRIDX+1) 

;GET  YEAR 

LD 

L, (IX+YRIDX) 

EI 

OR 

A 

! CLEAR  CARRY 

SBC 

HL,DE 

J  COMPARE  YEAR,  1983 

JR 

C. WAITYR 

:JUMP  IF  NOT  1983 

jWAIT 

FOR  MONTH  >=  2 

PUSH 

IX 

POP 

HL 

;HL  =  BASE  ADDRESS  OF  CLOCK 

LD 

DE. MTHIDX 

ADD 

HL,DE 

{POINT  AT  MONTH 

LD 

B,2 

CALL 

WAIT 

J  WAIT  FOR  FEBRUARY  OR  LATER 

f  WAIT 

FOR  DAY  >=  7 

DEC 

HL 

? POINT  AT  DAY 

LD 

B,7 

CALL 

WAIT 

sWAIT  FOR  7TH  OR  LATER 

SWAIT 

FOR  HOUR  >=  14 

DEC 

HL 

; POINT  AT  HOUR 
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LD  B, 14 

CALL  WAIT 

fWAIT  FOR  MINUTE  >=  1 

DEC  HL 

LD  B,  1 

CALL  WAIT 

(WAIT  FOR  SECOND  >=  20 

DEC  HL 

LD  B,20 

CALL  WAIT 

!  DONE 

HERE: 

«JP  HERE 


5 WAIT  FOR  2  PM  OR  LATER 

? POINT  AT  MINUTE 

?WAIT  FOR  2s 01  OR  LATER 

5 POINT  AT  SECOND 

J  WAIT  FOR  2:01.20  OR  LATER 

5  IT  IS  NOW  TIME  OR  LATER 


{ROUTINE:  WAIT 

; PURPOSE:  WAIT  FOR  VALUE  POINTED  TO  BY  HL 

?  TO  BECOME  GREATER  THAN  OR  EQUAL  TO  VALUE  IN  B 

J  ENTRY:  HL  =  ADDRESS  OF  VARIABLE  TO  WATCH 

;  B  =  VALUE  TO  WAIT  FOR 

J  EX IT:     WHEN  B  >=  (HL  ) 

5  USED:  AF 

WAIT: 

LD  A, (HL)  sGET  PART  OF  CLOCK  TIME 

CP  B  ! COMPARE  TO  TARGET 

JR  CWAIT  ;WAIT  IF  TARGET  NOT  REACHED 

RET 


END 


Appendix  A  Z80  Instruction  Set 

Summoiy 


MAIN  REG  SET  ALTERNATE  REG  SET 


ACCUMULATOR 
A 

FLAGS 
F 

ACCUMULATOR 
A' 

FLAGS 
f 

B 

C 

B- 

C 

D 

E 

D- 

E' 

H 

L 

H' 

L' 

GEMERAL 
>  PURPOSE 
REGISTERS 


INTERRUPT 
VECTOR 


MEMORY 
REFRESH 
R 


IMDEX  REGISTER  IX 


INDEX  REGISTER  lY 


STACK  POINTER  SP 


PROGRAM  COUNTER  PC 


SPECIAL 
S  PURPOSE 
REGISTERS 


Rgure  A-1 .  Z80  internal  register  organization 
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7 

6 

5 

4 

3 

2 

1 

0 

S 

Z 

X 

H 

X 

P/ V 

N 

C 

WHERE: 


c  = 

CARRY  FLAG 

N  = 

ADD/SUBTRACT  FLAG 

P/V  = 

PARITY/OVERFLOW  FLAG 

H  = 

HALF-CARRY  FLAG 

7.  = 

ZERO  FLAG 

S  = 

SIGN  FLAG 

X  = 

NOT  USED 

Figure  A-2.  Organization  of  the  Z80  flag  register 
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MASKABLE  (INT) 
MODE  0 


PLACE  INSTRUCTION  ONTO  DATA  BUS  DURING  INTACK  =  M!  •  lORQ  LIKE  80B0A 
MODE  1 

RESTART  TO  38„  OR  56, „  ('RST  56'1 
MODE  2 

USED  BV  Z80  PERIPHERALS 
/ 


INTERRUPT 
SERVICE 


3UTINE  / 
URTING  \ 


STARTII 
ADDRESS 
TABLE 


LOW  ORDER 


HIGH  ORDER 


NON  MASKABLE  (NMI) 

RESTART  TO  66„  OR  102,„ 
INTERRUPT  ENABLE  (  DISABLE  FLIP  FLOPS 


1  REGISTER 

8.  BIT  VECTOR 

CONTENTS 

FROM  PERIPHERAL 

ACTION 

IFF, 

IFFj 

CPU  RESET 

0 

0 

Dl 

0 

0 

El 

1 

1 

LD  A.  1 

IFFj 

-  PARITY  FLAG 

LD  A,  R 

IFF, 

-  PARITY  FLAG 

ACCEPT  NMI 

0 

RETN 

IFF, 

IFF, 

ACCEPT  INT 

0 

0 

RETI 

INDICATES  NO  CHANGE 


Rgure  A-3.  Z80  interrupt  structure 
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Table  A-1.  Z80  Instructions  in  Alphabetical  Order 


ADC  HL,  ss 

Add  with  Carry  Reg.  pair  ss  to  HL 

CPL 

Complement  Acc.  (1's  comp) 

ADC  A,  s 

Add  with  carry  operand  s  to  Acc. 

DAA 

Decimal  adjust  Acc. 

ADD  A,  n 

Add  value  n  to  Acc. 

DECm 

Decrement  operand  m 

ADD  A,  r 

Add  Reg.  r  to  Acc. 

DEC  IX 

Decrement  1 X 

ADD  A,  |HL) 

Add  location  !HL)  to  Acc. 

DEC  1 Y 

Decrement  lY 

ADD  A,  (IX+dl 

Add  location  (IX+d)  to  Acc. 

npp  c-o 
L/ti.  ss 

Decrement  Reg.  pair  ss 

ADD  A,  (lY+dl 

Add  location  (lY+d)  to  Acc. 

D 1 

Disable  interrupts 

ADD  HL,  ss 

Add  Reg.  pair  ss  to  HL 

DJNZe 

Decrement  B  and  Jump 

relative  if  B?^0 

ADD  IX,  pp 

Add  Reg.  pair  pp  to  IX 

ADD  lY,  rr 

Add  Reg.  pair  rr  to  1 Y 

El 

Enable  interrupts 

AND  s 

Logical  'AND'  of  operand  s  and  Acc. 

EX  tSP),  HL 

Exchange  the  location  (SP)  and  HL 

exchange  the  location  y^ri  and  1  a 

BIT  b,  (HL) 

Test  BIT  bof  location  (HL) 

EX  (SP),  lY 

Exchange  the  location  (SP)  and  lY 

BIT  b,  (IX+d) 

Test  BIT  b  of  location  (IX+d) 

EX  AF  AF' 

exchange  the  contents  ot  Ar 

BIT  b,  (lY+d) 

Test  BIT  b  of  location  (lY+d) 

and  AF' 

BIT  b,  r 

Test  BIT  b  of  Reg.  r 

EX  D E,  H L 

Exchange  the  contents  of  DE 

and  HL 

CALL  cc,  nn 

Call  subroutine  at  location  nn  if 

EXX 

Exchange  the  contents  of  BC,  DE, 

condition  cc  if  true 

riL  witn  conxenis  ot  dk^  ,  ut  ,  rii_ 

Unconditional  call  subroutine  at 

respectively 

CALL  nn 

location  nn 

HALT 

HALT  (vuait  for  interrupt  or  reset) 

CCF 

Complement  carry  flag 

IM  0 

Set  interrupt  mode  0 

CP  s 

Compare  operand  s  with  Acc. 

IWI  1 

Set  interrupt  mode  1 

CPD 

Compare  location  (HL)  and  Acc. 

decrement  HL  and  BC 

IM  2 

Set  interrupt  mode  2 

CPDR 

Compare  location  (HL)  and  Acc. 

IN  A,  (n) 

Load  the  Acc.  with  input  from 

decrement  HL  and  BC,  repeat 

device  n 

until  BC=0 

IN  r,  (C) 

Load  the  Reg.  r  with  input  from 

CPI 

Compare  location  (HL)  and  Acc. 

device  (C) 

increment  HL  and  decrement  BC 

INC  IHL) 

Increment  location  (HL) 

CPIR 

Compare  location  (HL^  and  Acc. 

INC  IX 

Increment  IX 

increment  HL,  decrement  BC 

repeat  until  BC=0 

INC  (IX+d) 

Increment  location  (IX+d) 
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Table  A-1.  (Continued) 


INC  lY 

Increment  lY 

LD  A,  (nn) 

Load  Acc.  with  location  nn 

INC  ilY+d) 

Increment  location  (lY+dl 

LD  A,  R 

Load  Acc.  with  Reg.  R 

INC  r 

Increment  Reg.  r 

LD  (BC),  A 

Load  location  (BC)  with  Acc, 

IMP 
IIMU  SS 

Increment  Reg.  pair  ss 

LD  (DE),  A 

Load  location  (DE)  with  Acc. 

IND 

Load  location  (HLl  with  input 

LD(HL),n 

Load  location  (HL)  with  value  n 

from  port  (CI,  decrertient  HL 
and  B 

LD  dd,  nn 

Load  Reg.  pair  dd  with  value  nn 

INDR 

Load  location  (HL)  with  input 

LD  HL,  (nn) 

Load  HL  with  location  (nn) 

rrom  port        oecrKiiiKiii  iil.  duu 

LD  (HL/,  r 

Load  location  (HL)  with  Reg.  r 

decrement  B,  repeat  until  B=0 

t  r\  1  A 
LU  1,  A 

Load  1  with  Acc. 

INI 

Load  location  (HLl  with  input 
from  port  (C);  and  increment  HL 

1    C   IV  nn 

Lr  lA,  nn 

Load  IX  with  value  nn 

and  decrement  B 

1  n  IV  (nnt 

Load  IX  with  location  (nn) 

INIR 

Load  location  (HL)  with  input 
from  port  (C),  increment  HL 

LD  (IX+d),  n 

Load  location  (IX+d)  with  value  n 

and  decrement  B,  repeat  until 

LD  (IX+d),r 

Load  location  (IX+d)  with  Reg.  r 

8=0 

LD  lY,  nn 

Load  lY  with  value  nn 

JP(HL) 

Unconditional  Jump  to  (HL) 

LD  lY,  (nn) 

Load  lY  with  location  (nn) 

JP(IX) 

Unconditional  Jump  to  (IX) 

LD  (lY+d),  n 

Load  location  (lY+d)  with  value  n 

JP  IIY) 

Unconditonal  Jump  to  (lY) 

LD(IY+d),r 

Load  location  (lY+d)  with  Reg.  r 

JP  cc,  nn 

Jump  to  location  nn  if 
condition  cc  is  true 

LD(nn),A 

Load  location  (nn)  with  Acc. 

JP  nn 

..... 

Unconditional  jump  to  location 

LD  (nn),  dd 

Load  location  (nn)  with  Reg.  pair  dd 

nn 

LD(nn),  HL 

Load  location  (nn)  with  HL 

JPG,  e 

Jump  relative  to  PC+e  if  carry=1 

LD  (nn),  IX 

Load  location  (nn)  with  IX 

JR  e 

Unconditional  Jump  relative 
to  PC+e 

LD(nn),  lY 

Load  location  (nn)  with  lY 

JP  NC  e 

liimn  rdntii/a  tfi  Pr^4-o  if  fiiirir\t—f\ 

uUiiip  reidiivc  lo  ro'C  ii  udiry  u 

LD  R,  A 

Load  R  with  Acc. 

JR  NZ,  e 

Jump  relative  to  PC+e  if  non 

LD  r,  (HL) 

Load  Reg.  r  with  location  (HL) 

zero  (Z=0) 

LD  r,  (IX+d) 

Load  Reg.  r  with  location  (IX+d) 

JR  Z.  e 

Jump  relative  to  PC+e  if  zero  (Z=1) 

LD  r,  (lY+d) 

Load  Reg.  r  with  location  (lY+d) 

LD  A,  (BC) 

Load  Acc.  with  location  (BC) 

LD  r,  n 

Load  Reg.  r  with  value  n 

LD  A,  (DE) 

Load  Acc.  with  location  (DE) 

LD  r,  r' 

Load  Reg.  r  with  Reg.  r' 

LD  A.  1 

Load  Acc.  with  1 

LD  SP,  HL 

Load  SPwithHL 
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Table  A-1.  (Continued) 


LD  SP,  IX 

Load  SPwIth  IX 

RES  b,  m 

Reset  Bit  b  of  operand  m 

LO  SP,  lY 

Load  SP  with  lY 

RET 

Return  from  subroutine 

LDD 

Load  location  IDE)  with  location 
(ML),  deqrement  DE,  HL  and  BC 

RET  cc 

Return  from  subroutine  if  condition 
cc  Is  true 

LDDR 

Load  location  (DE)  with  location 
(HL),  decrement  DE,  HL  and  BC; 
repeat  until  BC=0 

RETI 
RETN 

Return  from  interrupt 

Return  from  non  maskable  interrupt 

LDI 
LDIR 

Load  location  (DE)  with  location 
(HL),  increment  DE,  HL, 
decrement  BC 

Load  location  (DE)  with  location 
(HL),  increment  DE,  HL, 
decrement  BC  and  repeat  until 
BC=0 

RL  m 
RLA 

RLC  (HL) 
RLC  (IX+d) 
RLC  (lY+d) 

Rotate  left  through  carry  operand  m 
Rotate  left  Acc.  through  carry 
Rotate  location  (HL)  left  circular 
Rotate  location  (IX+d)  left  circular 
Rotate  location  (lY+d)  left  circular 

NEG 

Negate  Acc.  (2's  complement) 

RLC  r 

Rotate  Reg.  r  left  circular 

NOP 

No  operation 

RLC  A 

Rotate  left  circular  Acc. 

OR  s 
OTDR 

OTIR 

Logical  'OR'  or  operand  s  and  Acc. 
Load  output  port  (C)  with  location 
(HL)  decrement  HL  and  B,  repeat 
until  B=0 

Load  output  port  (C)  with  location 
(HL),  increment  HL,  decrement  B, 
repeat  until  B=0 

RLD 

RR  m 
RRA 
RRC  m 
RRCA 

Rotate  digit  left  and  right  between 

Ann     nn.J                                /  t_l  1  \ 

ACC,  and  location  \riL) 
Rotate  right  through  carry  operand  m 
Rotate  right  Acc.  through  carry 
Rotate  operand  m  right  circular 
Rotate  right  circular  Acc. 

OUT  (C),  r 

OUT  (n),  A 
OUTD 

Load  output  port  (C)  with  Reg.  r 

Load  output  port  ( n)  with  Acc. 
Load  output  port  (C)  with  location 
(HL),  decrement  HL  and  B 

RRD 
RST  p 

Rotate  digit  right  and  left  between 
Acc.  and  location  (HL) 

Restart  to  location  p 

OUTI 

Load  output  port  (C)  with  location 
(HL),  increment  HL  and  decrement 

SBC  A,  s 

Subtract  operand  s  from  Acc.  with 
carry 

POP  IX 

B 

Load  IX  with  top  of  stack 

SBCHL,  ss 

Subtract  Reg.  pair  ss  from  HL  with 
carry 

POP  lY 

Load  lY  with  top  of  stack 

SCF 

Set  carry  flag  (C=1) 

POP  qq 

Load  Reg.  pair  qq  with  top  of  stack 

SET  b,  (HL) 

Set  Bit  b  of  location  (HL) 

PUSH  IX 

Load  IX  onto  stack 

SET  b,  (IX+d) 

Set  Bit  b  of  location  (IX+d) 

PUSH  lY 

Load  lY  onto  stack 

SET  b,  (lY+d) 

Set  Bit  b  of  location  (lY+d) 

PUSH  qq 

Load  Reg.  pair  qq  onto  stack 

SET  b,  r 

Set  Bit  b  of  Reg.  r 
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Table  A-1.  (Continued) 


SLAm 

Shift  operand  m  left  arithmetic 

SUB  s 

Subtract  operand  s  from  Acc. 

SRA  m 

Shift  operand  m  right  arithmetic 

XORs 

Exclusive  'OR'  operand  s  and  Acc. 

SRL  m 

Shift  operand  m  right  logical 

Table  A-2.  Z80  Operation  Codes  in  Numerical  Order 


OBJECT  CODE 

INSTRUCTION 

OBJECT  CODE 

INSTRUCTION 

00 

NOP 

19 

ADD 

HLDE 

01  yvyy 

LD 

ac  dalaie 

1A 

LD 

A.IDEI 

02 

LD 

IBCl  A 

IB 

DEC 

DE 

03 

INC 

BC 

IC 

INC 

E 

04 

INC 

B 

ID 

DEC 

E 

06 

DEC 

B 

IE  yy 

LD 

E  data 

06  yy 

LD 

B  data 

IF 

BRA 

07 

RLCA 

20  disp-2 

JR 

NZ.disp 

08 

EX 

AF  AF- 

21  yyyy 

LD 

HL  data  16 

09 

ADO 

HL  BC 

22  ppqq 

LD 

(addrlHL 

OA 

LD 

A(BCt 

23 

INC 

HL 

OB 

DEC 

BC 

24 

INC 

H 

OC 

INC 

C 

25 

DEC 

H 

OD 

DEC 

C 

26  yy 

LD 

H  data 

OE  vy 

LD 

C  data 

27 

DAA 

OF 

RRCA 

28  dlsp-2 

JR 

Z.disp 

10  disp-2 

DJNZ 

dtsp 

29 

ADD 

HL  HL 

1 1  yyyy 

LD 

DE  data  16 

2A  ppqq 

LD 

HL.Iaddrl 

12 

LD 

IDE)  A 

2B 

DEC 

HL 

13 

INC 

DE 

2C 

INC 

L 

14 

INC 

D 

2D 

DEC 

L 

15 

DEC 

D 

2E 

LD 

L  data 

16  yy 

LD 

D  data 

2F 

CPL 

17 

RLA 

30  disp-2 

JR 

NO  disp 

18  dlsp-2 

JR 

disp 

31  yyyy 

LD 

SPdataie 
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OBJECT  CODE 

INSTRUCTtON 

OBJECT  CODE 

INSTRUCTION 

32  ppqq 

LD 

(addrl.A 

CB  0  Orrr 

RLC 

reg 

33 

SP 

CB  06 

RLC 

(HL) 

two 

(HL) 

OB  0  Irrr 

RRC 

reg 

35 

DEC 

'HD 

CB  OE 

RRC 

(HLl 

36  yy 

LD 

(HLl  data 

CB  1  Orrr 

RL 

reg 

37 

SCF 

OB  16 

RL 

(HLl 

38 

JR 

C.disp 

08  1  Irrr 

RR 

reg 

39 

ADD 

HL.SP 

CB  1 E 

RR 

(HLl 

3A  ppqq 

LD 

A.faddrl 

CB  2  Orrr 

SLA 

reg 

3B 

DEC 

SP 

CB  26 

SLA 

(HLl 

3*' 

INC 

CB  2  Irrr 

SRA 

reg 

DEC 

A 

CB  2E  ^ 

SRA 

(HLt 

3E  yy 

LD 

A  data 

SRL 

reg 

To 

CCF 

B  E 

SRL 

(HL) 

sss 

LD 

8  reg 

CB  0 1  bbbrrr 

BIT 

b  reg 

LD 

B  (HL) 

CB  0  ibbb 1 10 

BIT 

b  (HLl 

sss 

LD 

C  reg 

CB  lObbbrrr 

RES 

b  reg 

IE 

LD 

C  (HLt 

CB  lObbbl 10 

RES 

b  (HLl 

5  Osss 

LD 

D  reg 

CB  1 1  bbbrrr 

SET 

b  reg 

ID 

D  (HD 

Co  1  IPuul  HJ 

SET 

b  IHLl 

LD 

E  reg 

CO  ppqq 

CALL 

Z.addr 

LL^ 

E  (HL) 

CD  ppqq 

CALL 

addr 

6  Osss 

LD 

H.reg 

CE  yy 

ADC 

A  data 

66 

LD 

H  (HL) 

CF 

RST 

08  H 

5  Isss 

LD 

L  reg 

DO 

RET 

NO 

6E 

LD 

L.[HL) 

D 1 

POP 

DE 

7  Osss 

LD 

(HL)  reg 

D2  ppqq 

JP 

NO  addr 

76 

HALT 

D3  vv 

OUT 

(port).  A 

sss 

LD 

A  reg 

D4  ppqq 

CALL 

NC.addr 

LD 

A  (HL) 

D5 

PUSH 

DE 

ADD 

A.  reg 

D6  vv 

SUB 

data 

86 

ADD 

A  (HL) 

RST 

10H 

8  Irrr 

ADC. 

A.  reg 

D8 

RET 

C 

8E  '^'^'^ 

ADC 

A.(HL) 

D9 

EXX 

9  0 

SUB 

reg 

DA  ppqq 

JP 

C.addr 

96 

SUB 

(HLl 

DB  vv 

IN 

A. (port) 

SBC 

A. reg 

DC  ppqq 

CALL 

C  addr 

SBC 

A.(HL) 

DD  OOxx  9 

ADD 

IX.pp 

A  Orrr 

AMD 

reg 

DD  2 1  yyvv 

LD 

IX  data  16 

AND 

(HLl 

DD  22  ppqq 

LD 

(addr)  IX 

A  1 

XOR 

reg 

INC 

IX 

AE 

XOR 

(HLl 

DD  2A  ppqq 

LD 

IX.(addr) 

B  Orrr 

OR 

reg 

DD  28 

DEC 

IX 

B6 

OR 

(HLl 

DD  34  disp 

INC 

(IX  disp) 

B  Irrr 

CP 

reg 

DD  35  disp 

DEC 

(1X4-  dtsp) 

BE 

CP 

(HLl 

DD  35  disp  yy 

LD 

(IX  +■  disp).data 

CO 

RET 

NZ 

DD  OldddllO  disp 

LD 

reg  (IX  +  disp) 

CI 

POP 

BC 

DD  7  Osss  disp 

LD 

(IX  +  disp).reg 

C2  ppqq 

JP 

NZ  addr 

DD  85  disp 

ADD 

A.dX  +disp) 

C3  ppqq 

JP 

addr 

DD  8E  disp 

ADC 

A.dX  +disp) 

C4  ppqq 

CALL 

NZ.addr 

DD  96  disp 

SUB 

(!X  +  disp) 

C5 

PUSH 

BC 

DD  9E  disp 

SBC 

A.dX  +  disp) 

C6  yy 

ADD 

A,  data 

DD  A6  disp 

AND 

(IX  +  displ 

C7 

RST 

OOH 

DD  AE  disp 

XOR 

[IX  +  displ 

08 

RET 

Z 

DD  86  disp 

OR 

(IX  -1  disp) 

09 

RET 

DD  BE  diSp 

CP 

IIX  +disp) 

CA  ppqq 

JP 

Zaddr 

DD  CB  disp  06 

RLC 

(IX  +  disp) 
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Table  A-2.  (Continued) 


OBJECT  CODE 

(NSTRUCTION 

OBJECT  CODE 

INSTRUCTION 

DD  CB  disp  OE 

RRC 

(IX  +  disp) 

ED  88 

LDDR 

DD  CB  disp  16 

RL 

(IX  +  disp) 

EO  89 

CPDR 

DD  CB  disp  IE 

MAT-  Ulbp' 

ED  8A 

DD  CB  disp  26 

SLA 

nx  +  displ 

EO  BB 

OTDR 

DO  CB  disp  2E 

FF  v/v/ 

XOR 

Tr" 

DD  CB  disp  3E 

SRL 

{IX  +  disp) 

EF 

RST 

DD  CB  disp  OlbbbllO 

BIT 

b  (tX  +  displ 

FO 

DD  CB  disp  lObbbI  10 

h  fl V  J-  Hicnl 
□  11 A  T  uisp  r 

Fl 

POP 

AF 

DD  CB  disp  llbbbl  10 

SET 

JP 

Paddr 

DD  El 

POP 

F3 

01 

DD  E3 

iSP)  !X 

F4  ppQq 

CALL 

Paddr 

DD  E5 

PUSH 

IX 

PUSH 

AF 

DD  E9 

IP 

■ 

(IX) 

F6  yy 

OR 

data 

DD  F9 

F7 

RST 

30H 

DE  vv 

A^d'^ 
a  a 

RET 

M 

DF 

RS 

1  H 

F9 

LD 

SP  HL 

EG 

RET 

PC 

FA  ppqp 

JP 

M  addr 

El 

POP 

HL 

El 

E2  ppQq 

JP 

POaddr 

FC  ppqq 

CALL 

M  addr 

E3 

EX 

HL 

ADD 

lY  rr 

CALL 

PC,  add  r 

FD  21  yyvv 

LD 

lYdalaie 

E5 

PUSH 

HL 

r[_J  ppqq 

LD 

laddrl  lY 

AND 

data 

IMC 

iY 

E7 

RST 

20H 

LD 

lYtaddr) 

E8 

RET 

RE 

FD  2B 

DEC 

IY 

E9 

JP 

(HL 

FD  34  disp 

INC 

[IY  *  disp) 

FA  nnnn 

JP 

PE.addr 

FD  35  disp 

DEC 

(IY  +  disp) 

EB 

EX 

DE  HL 

FD  36  disp  vv 

LD 

(IY  t  disp)  data 

CALL 

^  / 

FD  Olddd MO  disp 

LD 

reg  (IY  +  disp) 

ED  OldddOOO 

regl 

FD  7  Osss  disp 

LD 

liY  ■*■  disp), reg 

ED  OisssOOl 

OUT 

J.reg 

FD  85  disp 

ADD 

A  (IY  +  disp) 

ED  01 XX  2 

SBC 

HL.rp 

Fn  RF  Hkn 

A  (IV  J.  r4io>^k 
M,ll  I  +  UlSpi 

ED  01 XX  3  ppQp 

LD 

(addr).rp 

FD  96  disp 

(IV  J,  r^iont 

III  ^  Uisp) 

ED  44 

NEG 

Fn  QF  Hicn 

SBC 

A    /iV     1  r4;^nl 

AJIY  +  disp) 

ED  45 

RETN 

Fn  AR  Hicn 
ri_/  rto  Uiap 

AND 

HY  +  disp) 

ED  OlOnn 1 10 

IM 

m 

FPv  AF  Hior\ 
rU  rtC  UiSp 

XOR 

/IV  1 

IIY  +  disp) 

ED  47 

LD 

LA 

rU  DO  UlSp 

OR 

/IV  i  .-llc-nh 

11 Y  +  (3lSp) 

ED  01 xx^A 

ADC 

HL  rp 

FP)  RF  Hlon 
ru  DC  uisp 

U  Y  +  Pisp) 

ED  Olxx  B  ppqq 

LD 

rp,(addr) 

Fn  PR  Hicn  npi 
uibp  vJO 

RLC 

(lY  +  disp) 

ED  4D 

RETt 

Fn  CR  Hii;n 
ru  VwD  UTbp  uc 

rl'' 

(IY  +  disp) 

ED  4F 

LO 

R,A 

Fn  PR  Hicn  IK 
ru  Lru  uissp  Id 

/IV    J-  rlil-r^V 

ilY  +  disp) 

ED  57 

LD 

Al 

Fn  PR  riicn  IF 
ru        Uisp  IF 

RR 

(IY  +  disp) 

ED  5F 

LD 

A.R 

Fn  PR  Hicn  7R 
ru         ulbp  £.0 

SLA 

(IY  +  disp) 

ED  67 

RRD 

FD  CB  disp  2E 

SRA 

(lY  +  disp) 

ED  6F 

RLD 

FD  CB  disp  3E 

SRL 

(lY  +  disp) 

ED  AO 

LOl 

FD  CB  disp  OlbbbllO 

BIT 

b(IY+disp) 

ED  Al 

CPi 

FD  CB  disp  lObbbllO 

RES 

bjlY  t  disp) 

ED  A2 

INI 

FD  CB  disp  llbbbllO 

SET 

b.OY  +  disp) 

ED  A3 

OUTI 

FD  El 

POP 

IY 

ED  A8 

LDD 

FD  E3 

EX 

(SP)  IY 

ED  A9 

CPD 

FD  E6 

PUSH 

IY 

ED  AA 

IND 

FD  E9 

JP 

(IY) 

ED  AB 

OUTD 

FD  F9 

LD 

SP.IY 

ED  BO 

LDIR 

FE  yy 

CP 

data 

ED  Bl 

CPIR 

FF 

RST 

3SH 

ED  82 

INIR 

ED  B3 

OTIR 
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Table  A-3.  Z80  8-Bit  Load  Instructions 


LD  r,  r' 
LD  r,  n 


LD  r,  (HL) 
LD  r,  (IX+d) 


LD  r,  (lY+d) 


LD  (HL),  r 
LD  (IX+d),  I 


LD  (lY+d),  r 

LD  (HL).  n 
LD  (IX+d),  n 


Symbolic 
Operation 


LD  A,  (BC) 
LD  A,  (DE) 
LD  A,  (nn) 


LD  (BC),  A 
LD  (DE),  A 
LD  (nn),  A 


LD  A,  I 
LD  A,  R 
LDI,A 


r  r' 

r  ^  n 


r-(HL) 
r^(IX+d) 


r^(IY+d) 


(HL)  ^  I 
(IX+d) 


(IY+d)^r 

(HL)  <-  n 
(IX+d) »-  n 


LD  (lY+d),  n      (lY+d)  *-  n 


A^(BC) 
A  -  (DE) 
A^(nn) 


(BC)-i- A 
(DE)^  A 
(nn)  *-  A 


A^I 
A<-R 
I-^A 


Flags 


ZP/VS 


IFF  t 
i 

IFF  t 


OP-Code 


76  543  210 


01  r 

00  r 
' '  n 

01  r 

II  on 

01  r 


d 

111  101 
r    1 10 


01 


01 


101 


d 

110 

on 

110  r 
d 

111  101 

110  r 
d 

00  110  110 
*-  n 

11  on  101 
00  no  1 10 
^  d 

^  n 

II   111  101 

00  no  no 

*-    d  ^ 
n 

00  001  010 

00  Oil  OiO 

00  III  010 


00  000  010 
00  010  010 

00  no  010 


11  101  101 

01  010  111 

11  101  101 

01  on  111 

II  101  101 

01  000  111 

II  101  101 

01  001  111 


No. 
of 

Bytes 


No. 
oFM 
Cycles 


No. 
of  T 

Cycles 


Notes:      r,  r'  means  any  of  the  registers  A,  B,  C,  D,  E,  H,  L 

IFF  the  content  of  the  interrupt  enable  flip-flop  (IFF)  is  copied  into  the  P/V  flag 

Flag  Notation:    •  =  flaE  not  affected,  0  =  flag  reset,  1  =  Hag  set,  X  =  flag  is  unknown, 
t  =  flag  is  affected  according  to  the  result  of  the  operation. 


I,  r" 

000 
001 
010 
01) 
100 
101 

111 


Reg. 

B 
C 
D 
E 
H 
L 
A 
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Table  A-4.  Z80  16-Bit  Load  Instructions 


Hagi 

Op-Code 

No. 

No. 

No. 

Mnemonic 

^mbolk 

C 

z 

s 

N 

H 

to   M J  ill! 

of 

ofT 

LD  dd,  nn 

dd  *-  nn 

00  ddo  001 

*-     n  ~* 

3 

3 

10 

dd  Fait 

00  BC 

01  DE 

LD  IX.  nn 

IX»-nn 

11  Oil  101 
00  100  001 

*-     n  — 

4 

4 

14 

10  HL 

11  SP 

LD  lY,  nn 

lY  nn 

il  111  101 
00  100  001 
»-     n  -* 

4 

4 

14 

LD  HL,  (ni.) 

H  •  (na+I ) 
L  (nn) 

00  101  010 
—     n  — 

3 

5 

16 

LD  dd,  (nn) 

dd(j  -(nn+n 
dd|^  —  (nn) 

• 

« 

• 

• 

• 

11  101  101 
0!  ddl  Oil 

4 

6 

20 

LD  IX,  <nn) 

IXj^  -(nn+1) 
IXj^  -  {nn) 

11  Oli  101 
00  101  010 

4 

6 

20 

LD  lY,  (nn) 

iY^  —  {nn-H ) 
IY(_  -  (nn) 

• 

• 

• 

• 

• 

]  !    ill  101 
00  101  010 

4 

6 

20 

LD  (nn).  HL 

(nn*l)  -H 
(nn)  -  L 

• 

• 

• 

• 

• 

• 

00  100  010 

3 

5 

16 

LD  (nn),  dd 

(nn+1)  *-dd^ 
(nn)  •-  ddj^ 

-  n  ^ 
11  101  101 
01  ddO  01 1 

-  n  - 

4 

6 

20 

LD(nn).IX 

tnn+l)  -IXj^ 
(nn)  -  IXj^ 

li  Oil  iOI 
00  100  010 

^     n  — 

4 

6 

20 

LD  (nn),  lY 

(nn+1)  -lYj^ 
(nn)  -  lYj^ 

1!  Ill  101 

00  100  010 
—     n  — 

4 

6 

20 

LD  SP,  HI 

SP  --HL 

U  HI  001 

1 

t 

6 

LD  SP.  IX 

SP-IX 

11  Oil  101 

1!  Ill  001 

2 

2 

10 

LD  SP.  IV 

SP-IY 

I!  Ill  101 
tl  111  001 

2 

10 

qq  Pair 

PUSH  qq 

(SP-2)  -qqj_ 

11  qqO  101 

1 

3 

11 

00  BC 

PUSH  IX 

(SP-l)-qqj^ 
(SP-2)  ^  iX^ 
(SP-l)-iX„ 

11  01!  101 
11  100  101 

2 

4 

15 

01  DE 

10  HL 

11  AF 

PUSH  lY 

(SP-2)  -lYj^ 
(SP-l)*-IYj^ 

11  111  101 
11  100  101 

2 

4 

IS 

POP  qq 

qqH^(SP+l) 

n  qqO  001 

1 

3 

10 

POP  IX 

qqL-(SP) 

iXj^  *-<sPn) 

IXl  -  (SP) 

11  on  101 

11   100  001 

2 

4 

14 

POPIY 

IYj,-(SP+l) 
!Yl-(SP) 

11  111  101 
11  !00  001 

2 

4 

14 

Notej:      dd  is  any  of  the  register  pairs  BC,  DE,  HL,  SP 
qq  is  any  of  the  register  pairs  AF,  BC,  DE,  HL 

(PAIRju,  (PAIR),  refer  to  high  order  and  low  order  eight  bits  of  the  register  pair  respeclively 
E.g  BCl=C.AFjj  =  A 

Flag  Notation 

•  =  flag  not  affected,  0  =  flag  reset,  1  =  flag  set,  X  ~  flag  is  unknown, 
t  flag  is  affected  according  to  the  result  of  the  operation. 
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Table  A-5.  Z80  Exchange,  Block  Transfer,  and  Block  Search  Instructions 


Mnemonic 


EX  DE,  HL 
tX  AK,  AH' 
EXX 

EX  ISP),  HL 
EX  (SP).IX 
tX  ISP),  lY 

LOI 


Symbolic 
Operation 


DE  ■  HL 
AF  -■  AK' 

fac 

DE 
KH 

H  -  (SPtl) 
I  -  (SP) 
IXjj-(SP+l) 

1Y|^--(SP-H) 
IY^»(SP) 

(DE)-  (HLl 
DE  -  UE>  1 
HL  •-  HL+I 


Hi  - 


(DE)  -  (ULl 
DE  -  DL+  I 
HL  -  IILtl 
BC  -  BC- 1 
Repeal  imiil 
UC  =  a 


ItC  ■  BC-1 

IDI  )  -  (HI) 
Dl  -  DE  I 
HL  -  HL-I 
liC-BC  1 
Repeat  until 
BC  =  0 

A-(HL) 
HL  -  HLtl 

ar  -  Br- 1 

A -(HI  I 
HL  -  HL*1 
B<  -  BC-I 
Repi  :il  iiiilil 
A  =  lllLI  or 
BC=0 

A-IHLl 
HL-  HL-I 
B(  -  BC- 1 

A  -  (HE) 
IIL  -HL-1 
Br  -  Br- 1 
Repeat  until 
A  -  (HL)  or 
Br  »  0 


Notes:     ®  P'V  flag  is  0  11  the  result  of  BC- 1  -  0.  otherwise  P'V  =  I 
Q)  Z  flag  IS  I  if  A  =  (HL).  otherwise  Z  =  0. 

I  lag  Notation:    •  =  flag  not  affi-'ctetj,  0=  flag  reset,  J  =  naj!  set,  X  =  flag  is  unknown, 
t  =  tlag  is  affected  according  to  the  result  of  the  operation. 


t 


©CD 


Opcode 


76  543  210 


11  101  on 

00  001  000 

II  Oil  001 

n  100  on 

11  on  101 

11  100  on 

II  111  101 

11  100  on 

n  101  101 

10  100  000 


11  101  101 
10  1 10  000 


n  101  101 

1(1  101  000 


II  101  101 
10  i  1  1  000 


II  101  101 
10  100  001 


II  101  101 
10  1 10  001 


II  101  101 
10  101  001 


II  101  101 
10  1 1  1  001 


of  M 
Cycles 


ofT 
States 


Register  bank  and 
auxiliary  register 
bank  exchange 


Load  (HL)  into 
(D£).  increment  the 
pointers  and 
decrement  the  byte 
counter  (BCl 

IfBC*  0 
If  BC  "  0 


IfBC*  0 
IfBC"  0 


If  EC  *  0  and  A  *  (HLl 
llBC=0orA  =  (HL) 


It  BC  *  0  and  A  *  (HL) 
IfBC-OorA-lHL) 
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Table  A-6.  Z80  8-Bit  Arithmetic  and  Logical  Instructions 


Mnemonic 

Symbolic 
Operation 

Flags 

Op-Code 

No. 
of  M 
Cycles 

No. 
ofT 
States 

Comments 

c 

z 

p, 

/ 

V 

N 

w 

76  543  210 

No. 
of 

Bytes 

ADD  A,  r 

A     A  +  r 

J 

V 

J 

Q 

J 

lU  ]UUU|  r 

1 

1 

4 

r  Reg. 

ADDA.n 

A  <-  A  +  n 

t 

X 

V 

t 

0 

t 

a  iini  110 

2 

2 

7 

000  B 

001  C 

ADD  A,  (HL) 

^     n  - 

010  D 

A  *  A  +  (HLJ 

t 

t 

V 

X 

0 

f 

10  [000]  1 10 

] 

2 

01 1  E 

ADDA,(IX+d)   A-A  +  (lX+d) 

t 

X 

V 

\ 

0 

1 

11  oil  101 

3 

5 

19 

100  H 

10  [OOO]  1  10 
*-     d  — 

101  L 
III  A 

ADD  A,  (lY+d 

1  A»-A+(IY+d) 

t 

X 

V 

t 

0 

t 

11   111  101 

3 

1 9 

10  [OOOl  1 10 
^     d  - 

ADC  A,  s 

A  -  A  +  s  +  CY 

t 

X 

V 

t 

0 

t 

looil 

s  is  any  of  r,  n. 

SUB  s 

A-^A-s 

t 

X 

V 

t 

1 

t 

loiol 

SBC  A,  s 

A  -  A  -  s  -  CY 

t 

t 

V 

t 

1 

t 

inm 

IIY+d)  as  shown  fo 
ADD  instruction 

ANDs 

A  ^  A  A  s 

0 

t 

p 

t 

0 

1 

QM] 

OR  s 

A*-A  V  s 

0 

) 

p 

t 

0 

0 

(Tirn 

The  Indicated  bits 

XOR  s 

A»- A  es 

0 

t 

p 

) 

0 

0 

replace  the  000  in 

CPs 

the  ADD  set  above 

A-s 

t 

I 

V 

t 

i 

X 

rrm 

INC  I 

r  -  r  +  1 

• 

1 

V 

t 

0 

t 

00     r  [Tool 

1 

1 

4 

INC  (HL) 

IHL)  ^  (HL)+I 

• 

V 

t 

0 

t 

00  no|  lool 

1 

3 

1  1 

INC  (IX+d) 

(IX+d)  ^ 

• 

V 

t 

0 

t 

11  on  101 

3 

6 

23 

(IX+d)+l 

00  1 lofTooj 

INC  (lY+d) 

(lY+d)  - 

• 

t 

V 

t 

0 

t 

d 

II   111  101 

3 

6 

23 

(lY+d)  +  1 

00 ■ 1 1 0 1 lOOl 

DECm 

m<-in-I 

• 

V 

( 

1 

t 

d 

CM] 

m  Is  any  of  r,  (HL) 

(IX+d),  (lY+d)  as 

shown  for  IN(^ 
Same  lormiil  and 
states  as  INC 
Replace  100  with 
101  in  OP  code. 


Notes:  The  V  symbol  in  the  P/V  flag  column  indicates  thai  Ihc  P'V  flae  contains  the  overflow  ol  Ihc  result  ol  the 
opciation  Similarly  the  P  symbol  indicates  parity.  V  =  I  means  overllow,  V  =  0  means  nol  ovorllow  P  =  I 
means  parity  of  the  result  is  even,  P  =  0  means  panty  of  the  result  is  odd. 

Flag  Notation:    •  =  flag  not  affected.  0  =  Hag  reset,  I  =  tlap  set,  X  =  llau  is  imknown.  tj 
X  =  flag  is  aflccled  according  to  the  result  of  the  operation  S 

d 
O 
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Table  A-7.  Z80  General-Purpose  Arithmetic  and  CPU  Control 


Flags 

Op-Code 

No. 
of 

No. 

OfM 

Cycles 

No. 
ofT 

Mnemonic 

Symbolic 
Operation 

V 

N 

Oomnients 

DAA 
CPL 

Converts  acc. 
content  into 
packed  BCD 
following  add 
or  subtract 
with  packed 
BCD  operands 

A-^A 

• 

• 

p 
e 

• 

1 

t 
1 

00  100  111 

00  101  111 

1 
1 

1 
1 

4 
4 

Decimal  adjust 
accumulator 

Complement 
accumulator 
(one's  complemen 

NEC 

A-^  0  -A 

t 

t 

V 

t 

1 

t 

11  101  101 
01  000  100 

2 

2 

8 

Negate  acc.  (two's 
complement) 

CCF 

CY  ^CY 

t 

• 

• 

• 

0 

X 

00  111  111 

1 

1 

4 

Complement  carry 

nag 

SCF 

CY  ^  1 

1 

• 

• 

• 

0 

0 

00  no  111 

I 

1 

4 

Set  carry  flag 

NOP 

No  operation 

• 

00  000  000 

1 

1 

4 

HALT 

CPU  halted 

01  110  110 

1 

1 

4 

DI 

IFF  -0 

11  110  oil 

1 

1 

4 

EI 

IFF  1 

• 

• 

• 

e 

• 

« 

11  111  on 

1 

1 

4 

IMO 

Set  interrupt 
mode  0 

« 

• 

• 

• 

• 

« 

11  101  101 
01  000  110 

2 

2 

8 

IM  1 

Set  interrupt 
mode  1 

11  101  101 
01  010  110 

2 

2 

8 

IM2 

Set  interrupt 
mode  2 

11  101  101 
01  oil  110 

2 

2 

8 

Notes:     IFF  indicates  the  interrupt  enable  flip-flop 
CY  indicates  the  carry  flip-flop . 


Flag  Notation:    •  =  flag  not  affected,  0  =  flag  reset,  1  =  flag  set,  X  =  flag  is  unknown, 
t  =  flag  is  affected  according  to  the  result  of  the  operation. 
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Table  A-8.  Z80  16-Bit  Arithmetic  Instructions 


Mnemonic 

Symbolic 
Operation 

Flags 

Op-Code 

No. 
of 

No. 
of  M 
Cycles 

No. 
ofT 
States 

Comments 

C 

z 

/  V 

s 

N 

H 

76 

543 

210 

Bytes 

ADD  HL,  ss 

HL-HL+ss 

t 

« 

• 

• 

0 

X 

00 

ssl 

001 

I 

3 

U 

SI 

Reg. 

00 

BC 

AUL  ni,,  ss 

HL»-HL+  SS  +CY 

♦ 

t 

V 

t 

0 

X 

11 

101 

101 

2 

4 

15 

01 

DE 

01 

1  n 

iU 

HL 

ssl 

010 

11 

SP 

SBC  HL,  a 

HL-HL-ss-CY 

t 

t 

V 

t 

1 

X 

11 

101 

101 

2 

4 

15 

01 

ssO 

010 

ADD  IX,  pp 

IX»^IX  +  pp 

t 

• 

« 

• 

0 

X 

11 

Oil 

101 

2 

4 

IS 

pp 

Reg. 

GO  ppl  001 

00 

BC 

01 

DE 

10 

IX 

11 

SP 

ADD  IY,rr 

IY--IY+  rr 

t 

• 

• 

0 

X 

11 

HI 

101 

2 

4 

15 

rr 

Reg. 

00 

rrl 

001 

00 

BC 

01 

DE 

10 

lY 

II 

SP 

INC  ss 

ss  *-  ss  +  1 

m 

• 

• 

• 

• 

• 

00 

ssO 

on 

1 

1 

6 

INC  IX 

IX  -IX  +  1 

11 

Oil 

101 

2 

2 

10 

00 

100 

01 1 

INC  lY 

IY-IY+  1 

1 1 

III 

101 

2 

2 

10 

00 

100 

on 

DEC  ss 

ss  —  ss  -  1 

a 

00 

ssl 

on 

1 

1 

6 

DEC  IX 

IX  -  IX  -  1 

11 

oil 

101 

2 

2 

10 

00 

101 

01 1 

DECIY 

lY  -  lY  -  1 

11 

101 

2 

2 

10 

00 

101 

on 

Notes:  ss  is  any  of  the  register  pairs  BC,  DE,  HL,  SP 
pp  IS  any  of  the  register  pairs  BC,  DE.  IX,  SP 
rr  is  any  of  the  register  pairs  BC,  DE,  lY.  SP. 


Flag  Notation:    •  =  lias  no'  affected,  0  =  flag  reset,  I  =  flag  set,  X  =  Hag  is  unknown, 
t  =  Hag  is  affected  according  to  the  result  of  the  operation. 
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Table  A-9.  Z80  Rotate  and  Shift  Instructions 


Mnemonic 


RLA 

RRCA 

RRA 

RLCr 
RLC  (HL) 
RLC  (IX+d) 

RLC  (lY+d) 

RL.  m 
RRC  m 


SRA  m 


RLD 


Symbolic 
Operation 


r  (HLl  irX+dl  IIY'dt 


in  -^r  mi  i  ( 

EMI 

[5^ 


m"  r  (HLl  llX+dl  IIY+dl 


(HLl  (IX'ill  (iVt-dl 


m  =  I  IHLl  (IXtdl  (IY*d) 


I  1 


Flags 


Op-Code 


76  543  210 


00  010  111 


00  on  111 


11  001  oil 
OOlOOOl  r 
II  001  Oil 
OOlOOOl 110 

11  on  101 

11  001  Oil 

^     d  ^ 

ooloooino 
II  in  101 
11  001  on 

_   d  -» 

ooloooino 
foTol 


fooil 
MB 
riool 

rroTi 
Em 


11  101  101 
01  101  111 


11  101  101 
01  100  111 


No. 
of 

Bytes 


No. 
oFM 
Cycles 


Flag  Notation:    •  =  Hag  not  affected,  0  =  flag  reset,  1  =  llag  set,  X  =  flag  is  unknown, 
t  =  flag  is  affected  according  to  the  result  of  the  operation. 


No. 
ofT 
States 


Rotate  left  circular 
accumulator 


Rotate  left 
accumulator 


Rotate  right  circular 
accumulator 


Rotate  right 
accumulator 


Rotate  left  circular 
register  r 


r 

Reg. 

000 

B 

001 

C 

010 

D 

oil 

E 

100 

H 

101 

L 

111 

A 

instruction  format  and 
states  are  as  shown 
for  RLC,m.  To  form 
new  OP-code  replace 
loOOlof  RLC.m  with 
shown  code 


Rotate  digit  left  and 
right  between  the 
accumulator 
and  location  (HL) 
The  content  of  the 
upper  half  of  the 
accumulator  is 
unaffected 
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Table  A-10.  Z80  Bit  Manipulation  Instructions 


Notes:     The  notation     indicates  bit  b  (0  to  7)  oi  location  s. 

Flag  Notation:    •  =  flag  not  affected,  0  =  flag  reset,  I  =  flag  set,  X  =  flag  is  unknown, 
t  =  flag  is  affected  according  to  the  result  ot  the  operation. 


Flags 

Op-Code 

No. 

No. 

No. 

Mncfnonic 

Symbolic 

of 

of  M 

of  T 

Opdstion 

C 

z 

V 

s 

N 

H 

lb  543  210 

Bytes 

Cycles 

States 

Comments 

BIT  b,  r 

D 

• 

t 

X 

X 

0 

I 

11  001  Oil 

2 

2 

8 

r 

Reg. 

01b  r 

000 

g 

Brr  b,  (HL) 

Z  ^  (HL)|^ 

J 

X 

X 

0 

I 

11  001  Oil 

2 

3 

12 

001 

c 

01    b  110 

010 

D 

BIT  b,  (IX<-d) 

oil 

E 

Z-W+i). 

1 

X 

X 

0 

11  Oil  101 

4 

5 

20 

100 

H 

11  001  Oil 

101 

L 

111 

A 

^     d  - 

BIT  b,  (lY+d) 

01    b  110 

b 

Bit  Tested 

Z-OY+d) 

t 

X 

X 

11  111  101 

4 

5 

20 

000 

0 

11  001  Oil 

001 

1 

010 

2 

d  ^ 

on 

3 

01    b  110 

100 

4 

101 

5 

no 

6 

SET  b,  r 

111 

7 

• 

• 

e 

9 

9 

11  001  on 

2 

2 

8 

Q7]  b  r 

SET  b,  (HL) 

(HL)  1 

« 

• 

• 

• 

• 

• 

1 1  no  1  fi  1 1 

2 

I  s 

111!   b     1 10 

SET  b.  (IX+d) 

(lX+d)(,  ^  1 

II  on  101 

4 

6 

23 

11  00 1  0 1 1 

-    d  - 

[ED  b  no 

SET  b,  (lY+d) 

(lY+d)^  -  1 

• 

• 

9 

e 

9 

• 

II  III  101 

4 

6 

23 

11  001  on 

^     d  - 

fTT)  b  no 

RES  b,  m 

[H 

To  form  new  OP- 

m=t,  (HL), 

code  re 

place  [TT] 

(IX+d), 

of  SET  b,m  with 

(lY+d) 

fTol .  Flags  and  time 

states  for  SET 

instruction 
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Table  A-11.  Z80  Jump  Instructions 


IPnn 
IP  cc,  nn 

JRe 
JR  C,  e 

JR  NC,  e 


JR  NZ.e 

JP(HL) 
JP(IX) 
JP(IY) 

DJNZ.e 


Flags 

Op-Code 

No. 
of 

Bytes 

No. 
of  M 
Cycles 

No. 
of  T 
States 

Symbolic 
Operation 

C 

Z 

V 

s 

N 

H 

76  543  210 

PC  ^nn 

11  000  Oil 

—  n 

—  n  ~* 

3 

3 

10 

If  condition  cc 

• 

• 

• 

• 

ft 

ft 

11   cc  010 

3 

3 

10 

is  true  PC  *-nn, 

n  ~> 

otherwise 

—  n 

continue 

PC  ■*■-  PC  ■*■  e 

AO  mt  nnn 

—   e-2  -* 

2 

3 

1 2 

If  C  =  0, 

« 

• 

• 

• 

ft 

ft 

An     111  AAA 

UU    III  UUU 

2 

2 

7 

continue 

—  e-2 

If C  =  1 , 

2 

3 

1 2 

PC  ^  PC+e 

IfC-  1, 

00  110  000 

2 

2 

7 

f*      t  i  n  1 1  p 
V \Jl I  1 1  If U C 

-   e-2  ^ 

If  c  =  o, 

2 

3 

12 

PC  -  PC  +  e 

If  Z  =  0 

00  101  000 

2 

2 

7 

continue 

-    e-2  - 

If  Z  =  I, 

2 

3 

12 

PC  -  PC  t  e 

If  Z=  1, 

• 

tt 

• 

ft 

ft 

ft 

00  100  000 

2 

2 

7 

continue 

—  e-2 

If  Z  =  0, 

2 

3 

12 

PC  -PC  +  e 

PC  -HL 

• 

a 

• 

• 

ft 

ft 

11   101  001 

1 

1 

4 

PC -IX 

11  oil  101 
11  101  001 

2 

2 

8 

PC-IY 

11  111  101 
11  101  001 

2 

2 

8 

B-B-1 

• 

• 

« 

• 

ft 

ft 

00  010  000 

2 

2 

8 

If  B  =  0, 
continue 

-  e-2  -> 

IfB  *  0, 

2 

3 

13 

PC  -PC+e 

Notes:      e  represents  the  extension  in  the  relative  addressing  mode 

e  is  a  signed  two's  complement  number  in  the  range  <~126,  129!> 

e-2  in  the  op-code  provides  an  effective  address  of  pc  +e  as  PC  is 
incremented  by  2  prior  to  the  addition  of  e. 

Flag  Notation:    •  =  flag  not  affected,  0  =  flag  reset,  1  =  flag  set,  X  =  flag  is  unknown, 
t  =  flag  is  affected  according  to  the  result  of  the  operation. 


Comments 


cc 

Condition 

000 

NZnon  zero 

001 

Z  zero 

010 

NCnon  carry 

oil 

C  carry 

100 

PO  parity  odd 

101 

PE  parity  even 

110 

P   sign  positive 

111 

M  sign  negative 

If  condition  not  met 
If  condition  is  met 
If  condition  not  met 
If  condition  is  mot 
If  condition  not  met 
If  condition  is  met 
If  condition  not  mt 
If  condition  mot 


U  B  =  0 


IF  B^O 
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Table  A-12.  Z80  Call  and  Return  Instructions 


Mnemonic 


CALL  nn 


CALL  cc,  nn 


RET 


RET  cc 


RETI 
REIN 
RSTp 


Symbolic 
Operation 


(SP-l)-^PC 
(SP-2)*-PC, 
PC-^nn 


H 


If  condition 
cc  is  false 
continue, 
otherwise 
same  as 
CALL  nn 

PCj^-(SP) 


If  condition 
cc  is  false 
continue, 
otherwise 
same  as 
RET 


Return  from 
interrupt 

Return  from 
non  maskable 
interrupt 
(SP-1KPC„ 

(SP-2)-PCl 


Flags 


Op-Code 


76  543  210 


11  001  101 

*-  n  -* 
-t-  n 

11  cc  100 

^-  n 

^    n  ~* 


11  001  001 


1 1   cc  000 


11  101  101 
01  001  101 
11  101  101 
01  000  101 

11  t  111 


No. 
of 

Bytes 


3 


No. 

ofM 

Cycle! 


No. 
of  T 
Stales 


17 

10 
17 

10 

5 
11 


Flag  Notation:    •  =  flag  not  affected,  0  =  flag  reset,  1  =  flag  set,  X  =  flag  is  unknown 
♦  =  flag  is  affected  according  to  the  result  of  the  operation. 


Comments 


If  cc  is  false 
If  cc  is  true 


If  cc  is  false 


If  cc  is  true 


cc 

Condition 

000 

NZ 

non  zero 

001 

Z 

zero 

010 

NC 

non  carry 

Oil 

C 

carry 

100 

PO 

parity  odd 

101 

PE 

parity  even 

no 

P 

sign  positive 

111 

M 

sign  negative 

t 

P 

000 

OOH 

001 

08H 

010 

lOH 

on 

18H 

100 

20H 

101 

28H 

no 

30H 

111 

38H 
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Table  A-13.  Z80  I/O  Instructions 


Flags 

Op-Code 

No 

No. 

No. 

Symbolic 

■? 

of 

ofM 

ofT 

Mnemonic 

Operation 

C 

z 

V 

s 

N 

'H 

76  543  210 

Bytes 

cycles 

States 

Comments 

IN  A,  (n) 

A  -  (n) 

11  Oil  on 

—  n 

2 

3 

11 

n  to  Aq  Ay 

Acc  to  Ag  ~-  A  J  J 

IN  t,  (C) 

r-(C) 

• 

t 

p 

» 

0 

t 

11  101  101 

2 

3 

12 

C  to  Aji  ~  A.J 

ifr=  110  only 

01    t  000 

BtoAg-Ajj 

the  flags  wtU 

be  sffected 

CD 

INI 

(HL)  (C) 

X 

» 

X 

X 

1 

X 

U  101  101 

2 

4 

16 

C  to  Ag  ~ 

B  *-  B  -  1 

10  100  010 

BtoAg-Ajj 

HL  *-HL  +  1 

INIR 

(HL)-(C) 

X 

1 

X 

X 

1 

X 

11  101  101 

2 

5 

21 

C  to  A(,  ~  A^ 
Bto  Aj~A,5 

B*-B-  1 

10  110  010 

(If  B  ^  0) 

HL  *~  HL  +  ! 

2 

4 

16 

Repeat  until 

(If  B  -  0) 

B  =  0 

® 

IND 

(HL)  (C) 

X 

t 

X 

X 

1 

X 

11   101  lOI 

2 

4 

16 

C  to  Aq  - 
BtoAj- A,5 

B  *-  B  -  I 

10  101  DIG 

HL  ^  HL  -  1 

INDR 

(HL)  ^  (C) 

X 

1 

X 

X 

I 

X 

U  101  101 

2 

5 

21 

C  10  Ay  -  A^ 
Bto  Ag  -  A|5 

B-  B-  1 

10  ill  010 

(If  B  ^  0) 

HL     HL  -1 

16 

2 

4 

Repeat  until 
B  =  0 

(If  B  =  0) 

OUT  (n),  A 

(n)--A 

n  010  on 

2 

.) 

1 1 

n  to  Ay  -  A^ 
Acc  to  Ag  -  A, 5 

(C)  *-  r 

11  101  101 

2 

3 

1 2 

C  to  Ay  ^  A^ 

® 

01     T  001 

BtoAg~A,5 

OUTl 

(C)  -  {HI.) 

X 

t 

X 

X 

1 

X 

11   tO!  101 

2 

4 

16 

r  to  Ay  - 

B  *-  B  '  1 

BloAg-  A,j 

HL  —  HL  +  1 

OTIR 

(C)  -  (HL) 

X 

1 

X 

X 

1 

X 

11  101  101 

2 

5 

21 

('  lo  Ay  ~  Ay 
BtoAg-A,5 

B     B  -  1 

10  110  Oil 

(If  B  ^  0) 

HL  -  HL  +  1 

16 

2 

4 

Repeat  until 

(If  B  =  0) 

8  =  0 

® 

OUTD 

(C)  -  (HL) 

X 

t 

X 

X 

1 

X 

11  101  101 

2 

4 

16 

f  to  Ay 

B-B-  1 

10  101  Oil 

Bto  Aj,-  A,5 

HL-HL-  ! 

OTDR 

(C)-(HL) 

X 

1 

X 

X 

1 

X 

II  101  101 

2 

5 

2! 

C  to  Ay  -  A^ 
BtoAg^Ajj 

B-B-  1 

10  111  Oil 

(If  B  *  0) 

HL-HL-1 

16 

2 

4 

Repeat  until 
B  =  0 

(If  B  =  0) 

Notes:    (T)  If  the  result  of  B  -  1  is  zero  the  Z  flag  is  set,  otherwise  it  is  reset  - 

Flag  Notation:    •  =  flag  not  affected,  0  =  flag  reset,  1  =  flag  set,  X  =  flag  is  unknown, 
t  =  flag  is  affected  according  to  the  result  of  the  operation. 
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Table  A-14.  Summary  of  Z80  Flag  Operations 


Instruction 

C 

Z 

V 

s 

N 

H 

Comments 

ADD  A,s;  ADC  A,s 

t 

t 

V 

0 

t 

8-bit  add  or  add  witii  carry 

SUBs;SBC  A.s.CPs.NEG 

t 

V 

t 

1 

t 

8-bit  subtract,  subtract  with  carry,  compare  and 
negate  accumulator 

ANDs 

0 

p 

t 

0 

1 

1  Logical  operations 

OR  s;  XOR  s 

0 

i 

p 

t 

0 

0 

And  set's  different  flags 

INC  s 

• 

V 

t 

0 

t 

8-bit  increment 

DEC  m 

• 

V 

I 

t 

8-bit  decrement 

AUU  Ut),  SS 

• 

• 

• 

0 

X 

16-bit  add 

ADC  HL,  SS 

t 

i 

V 

t 

0 

X 

16-bit  add  with  carry 

SBC  HL,  SS 

t 

V 

1 

X 

16-bit  subtract  with  carry 

KJLA;  KLLA,  KKA,  RRCA 

t 

• 

• 

• 

0 

0 

Rotate  accumulator 

RL  m;  RLC  m;  RR  m;  RRC  m 

t 

p 

0 

0 

Rotate  and  shift  location  m 

SLA  m;SRAm;SRLm 

RLD.RRD 

• 

t 

p 

t 

0 

0 

Rotate  digit  left  and  right 

DAA 

t 

p 

• 

t 

Decimal  adjust  accumulator 

CPL 

• 

• 

• 

• 

1 

1 

Complement  accumulator 

SCF 

1 

• 

• 

• 

0 

0 

Set  carry 

CCF 

• 

• 

• 

0 

X 

Complement  carry 

IN  r,  (C) 

• 

p 

i 

0 

0 

Input  register  indirect 

INI;IND;OUTI;OUTD 

* 

X 

X 

I 

X 

I  Block  input  and  output 

INIR;  INDR,  OTIR;  OTDR 

• 

1 

X 

X 

1 

X 

1  Z  =  OifB#OotherwiseZ  =  1 

LDI,  LDD 

• 

X 

t 

X 

0 

0 

1  Block  transfer  instructions 

LDIR,  LDDR 

• 

X 

0 

X 

0 

0 

I  P/V  =  1  if  BC    0,  otherwise  P/V  =  0 

CPI,CPIR,CPD,CPDR 

• 

i 

t 

1 

X 

Block  search  instructions 

Z  =  1  if  A  =  (HL),  otherwise  Z  =  0 
P/V  =  1  if  EC    0,  otherwise  P/V  =  0 

LDA,  I;LD  A,  R 

■ 

t 

FFt 

0 

0 

The  content  of  the  interrupt  enable  flip-flop  (IFF) 

is  copied  into  the  P/V  flag 

BITb.s 

• 

t 

X 

X 

0 

1 

The  state  of  bit  b  of  location  s  is  copied  into  the  Z  f 

NEC 

i 

V 

t 

1 

t 

Negate  accumulator 

The  following  notation  is  used  in  this  table: 
Symbol  Operation 

C  Cariy/Hnk  flag.  C=l  if  the  operation  produced  a  carry  f  rom  the  MSB  of  the  operand  or  result. 

Z  Zero  flag.  Z=l  if  the  result  of  the  operation  is  zero, 

S  Sign  flag.  S=I  if  the  MSB  of  the  result  is  one. 

P/V  Parity  or  overflow  flag.  Parity  (P)  and  overflow  (V)  share  the  same  flag_  Logical  operations  affect  this  flag 

with  the  paiity  of  the  result  while  arithmetic  operations  affect  this  flag  with  the  overflow  of  the  result,  if  P/V 
holds  parity,  F/V=l  if  the  result  of  the  operation  is  even,  P/V=0  if  result  is  odd.  If  P/V  holds  overflow,  P/V=] 
if  the  result  of  the  operation  produced  an  overflow. 

H  Half -carry  flag,  H=l  if  the  add  or  subtract  operation  produced  a  carry  into  or  borrow  from  into  bit  4  of  the  accumulator. 
N  Add/Subtract  flag.  N  =  l  if  the  previous  operation  was  a  subtract. 

H  and  N  flags  are  used  in  conjunction  with  the  decimal  adjust  instruction  (DAA)  to  properly  correct  the  re- 
sult into  packed  BCD  foimat  following  addition  or  subtraction  using  operands  with  packed  BCD  fonnat. 

t  The  flag  is  affected  according  to  the  result  of  the  operation.  2 

•  The  flag  is  unchanged  by  the  operation. 

0  The  flag  is  reset  by  the  operation,  O 

1  The  flag  is  set  by  the  operation.  O 
X  The  flag  is  a  "don't  care," 

V  P/V  flag  affected  according  to  the  overflow  result  of  the  operation 

P  P/V  flag  affected  according  to  the  parity  result  of  the  operation. 

r  Any  one  of  the  CPU  registers  A,  B,  C,  D,  E,  H,  L. 

s  Any  8-bit  location  for  all  the  addressing  modes  aUowed  for  the  particular  instruction. . 

SB  Any  16-bit  location  for  all  the  addressing  modes  allowed  for  that  instniction. 

ii  Any  one  of  the  two  index  registers  IX  or  iY. 

R  Refresh  counter.  „ 

n  8-bit  value  in  range  <ii,  255>  O 

nn  16-bit  value  in  range  OO,  65535> 

m  Any  8-bit  location  for  ail  the  addressing  modes  allowed  for  the  particular  instruction,. 
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Table  A-15.  Summary  of  Z80  Restart  Instructions 
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Table  A-16.  Summary  of  the  Z80  Assembler 


ASSEMBLER  FIELD  STRUCTURE 

The  assembly  language  instructions  have  the  standard  field  structure  (see  Table 
2-1).  The  required  delimiters  are: 

1)  A  colon  after  a  label,  except  for  the  pseudo-operations  EQU,  DEFL,  and 
MACRO,  which  require  a  space. 

2)  A  space  after  the  operation  code. 

3)  A  comma  between  operands  in  the  operand  field.  (Remember  this  one!) 

4)  A  semicolon  before  a  comment. 

5)  Parentheses  around  memory  references. 

LABELS 

The  assembler  allows  six  characters  in  labels;  the  first  character  must  be  a  letter, 
while  subsequent  characters  must  be  letters,  numbers,  ?,  or  the  underbar 
character  (-).  We  will  use  only  capital  letters  or  numbers,  although  some  versions 
of  the  assembler  allow  lower-case  letters  and  other  symbols. 

RESERVED  NAMES 

Some  names  are  reserved  as  keywords  and  should  not  be  used  by  the  program- 
mer. These  are  the  register  names  (A,  B,  C,  D,  E,  H,  L,  I,  R),  the  double  register 
names  (IX,  lY,  SP),  the  register  names  (AF,  BC,  DE,  HL,  AF',  BC,  DE',  HL"),  and 
the  states  of  the  four  testable  flags  (C.  NC,  Z,  NZ,  M,  P,  PE,  PO). 

PSEUDO-OPERATIONS 

The  assembler  has  the  following  basic  pseudo-operations: 

DEFBorDB    -  DEFINE  BYTE 

DEFL  DEFINE  LABEL 

DEFM  DEFINE  STRING 

DEFS  or  DS   -  DEFINE  STORAGE 

DEFW  or  DW  -  DEFINE  WORD 

END  END 

EQU  EQUATE 

ORG  ORIGIN 

ADDRESSES 

The  Zilog  Z80  assembler  allows  entries  in  the  address  field  in  any 
of  the  following  forms 

1)  Decimal  (the  default  case) 
Example,  1247 

2)  Hexadecimal  (must  start  with  a  digit  and  end  with  an  H) 
Examples   142CH,  0E7H 

3)  Octal  (must  end  with  0  or  Q,  but  Q  is  far  less  confusing) 
Example    1247Q  or  12470 

4)  Binary  (must  end  with  B) 
Example    10010010001 1 1B 

5)  ASCII  (enclosed  in  single  quotation  marks) 
Example  'HERE' 

6)  As  an  offset  from  the  Program  Counter  ($) 
Example:  $+237H 


Appendix  B  Programming 

Reference  for  the 
180  PIO  Device 


D2 
D7 
D6 

_ 

C/D  SEL 
B/A  SEL 
A7 
A6 
A5 
A4 
GND 
A3 
A2 
Al 

 AO 

A  STB 
BSTB 
A  RDY 
DO 
Dl 


Pin  Name  Description  Type 

D0-D7  Data  Bus  Tristale,  Bidirectional 

CE_  Device  Enable  Input 

B/A  SEL  Select  Port  A  or  Port  B  Input 

C/D  SEL  Select  Control  or  Data  Input 

M I  Instruction  fetch  machine  Input 

  cycle  signal  from  CPU 

lORQ  Input/Output  request  from  CPU  Input 

RD  Read  cycle  status  from  CPU  Input 

A0-A7  Port  A  Bus  Tristate,  Bidirectional 

A  RDY  Register  A  Ready  Output 

A  STB  Port  A  strobe  pulse  Input 

BO  B7  Port  B  Bus  Tristate,  Bidirectional 

B  RDY  Register  B  Ready  Output 

B  STB  Port  B  strobe  pulse  Input 

lEI  Interrupt  enable  in  Input 

lEO  Interrupt  enable  out  Output 

INT  Interrupt  request  Output,  Open-drain 
+5V,GND   Clock,  Power,  and  Ground 


Figure  B-1.  PIO  pin  assignments 
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+5V  GND* 


CPU  7  Data  Bus 
Interface 


PIO  Control 
tines 


CPU 
Bus 
I/O 


Internal 
Control 
Logic 


Internal  Bus 


II 


Interrupt 
Control 


PORTA 
I/O 


PORT  B 

I'O 


Interrupt  Control  Lines 


Data  or 
Control 


Data  or 
Control 


t  Handshake 


^  Peripheral 
Interface 


Hgure  B<-2.  Block  diagram  of  the  PIO 


Mode  Control 
Reg 
(2  Bits) 

— 7% — 


Internai  Bus 


Mask 

Control 

 ^ 

Reg 

 1, 

(2  Bits) 

Mask 
Reg 
(8  Bits) 


Input/Output 
Select  Reg 
(8  Bits) 


Input  Data 


Interrupt 
Requests 


31 


Output  Enable 


Data 
Output 

Reg 
(8  Bits) 


Data 
Input 
Reg 
(8  Bits) 


'  8-Bit  Peripheral 

I  


Data  or  Control  Bus 


Si  ' 


Handshake 
Control 
Logic 


READY 


STROBE 


Handshake 
ines 


Figure  B-3.  Block  diagram  of  PIO  port  I/O 
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Rcgislcr  Seleclion 


Select  Lines 

Register  Seiected 

C/D 

B/A 

0 

0 

A  Data 

0 

1 

B  Data 

1 

0 

A  Control 

1 

i 

B  Control 

Mode  Conliol  Word 


D,  DjD,  D 


lyo  Register  Control  Word 


-Identifies  mode  control  word 
-Don't  care 
-  Mode  select 


0  0 
0  I 


Mode  0 
Mode  1 
Mode  2 
Mode  3 


Output 
Input 

Bidirectional 
Bit  Control 


Interrupt  Vector  Word 


Identifies  inierrupi 
vector 

User-supplied  interrupt 
vector 


bit  lo  oulpul 
I  sets  bit  to  input 


upt  Control  Word 


D,  DJDJDJ 


-Ideniincs  interrupt 
control  word 


Mask  Control  Word 


DJD,  DJD,  D,  D,  DJ 


Interrupt  Disable  Woid 


p.  D,  D,  Dj  0    0     I  I 


=  0 

No  mask  word  follows 

0, 

=  1 

Mask  word  follows 

Ds 

=  0 

Active  level  is  low 

fi 

Active  level  is  higti 

D, 

=  0 

Interrupt  on  OR  function 

D. 

=  1 

Interrupt  on  AND  function 

D, 

=  0 

Interrupt  disabled 

D, 

=  1 

Intenupt  enabled* 

"Note:  The  Port  is  not  enabled  until  the  interrupt  enable 
is  followed  by  an  active  Ml, 


-MBg-MBj  mask  bits.  A 
bit  is  monitored  for  an 
Interrupt  if  it  is  defined 
as  an  input  and  the  mask 
bit  is  set  to  0 


—Identifies  interrupt 
disable  word 


=  D  interrupt  disable 
D,  =  I    Interrupt  enable 


Figure  B-4.  Programming  summary  for  the  PIO 
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Ml 

MO 

Mode 

0 

0 

Output 

0 

1 

Input 

1 

0 

Bidirectional 

1 

I 

Bit  Control 

PIO  Mode 

Meaning 

Control  Word 

(Binary)  (Hex) 

0 

Output 

OOOOliU  OF 

1 

Input 

OlOOlUl  4F 

2 

Bidirectional 

10001111  8F 

3 

Control 

11001111  CF 

Note  that  bits  4  and  5  are  not  used  and 
could  have  any  values. 

Ml 

MO 

X 

X 

1 

1 

1 

1 

When  selecting  Mode  3,  the  next  byte  must 

set  the  1/  O  Register: 

I/07 

I/06 

I/05 

I/04 

1/03 

1/02 

I/Ol 

I/OO 

l/0=  1  Sets  bit  to  input 
1/0=0  Sets  bit  to  output 


Figure  B-5.  Mode  control  for  the  PIO 


7     6     5     4     3     2     10   Bit  no. 


Command  byte 


•Interrupt  vector  specified 

Output  these  eight  bits  when 

an  interrupt  request  is  acknowledged 


Figure  B-6.  Interrupt  vector  loading  format  for  the  PIO 
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6     5    4     3     2  10 


X    X     1     1     1  1 


-Bit  no. 
-Control  code 


-Mode  select  code 

-Don't  care 

-00  Output,  mode  0 
01  Input,  mode  1 

10  Bidirectional,  mode  2 

11  Control,  mode  3 


Figure  B-7.  Mode  selection  format  for  the  PIO 


7    6    5  4 


1  0 


1 

X 

X 

X 

0 

0 

1 

1 

•  Bit  no. 

■  Control  code 


-  Interrupt  enable  control 
■  Don't  care 

-  0  Disable  interrupts 
1  Enable  interrupts 


Figure  B-8.  Interrupt  enable/ disable  format  for  the  PIO 
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7 

6 

5 

4 

3 

2  1 

0  ■ 

0 

1 

1 

'1 

-Bit  no. 
-Control  code 


-  Interrupt  control  word 

-  1  if  interrupt  select  mask  follows 
0  otherwise 

-  1  high  input  on  selected  pins  is  active 
0  low  input  on  selected  pins  is  active 

- 1  AND  selected  pins  for  interrupt 
0  OR  selected  pins  for  interrupt 

-  1  Enable  interrupts 
0  Disable  interrupts 


FIgUfe  B-9,  Interrupt  condition-setting  format  for  the  PIO 
(mode  3  only) 


Table  B-1.  PIO  Select  Logic 


Table  B-2.  Addressing  of  PIO  Control  Registers 


Signal 

Selected  Location 

CE 

B/A  SEL 

C/D  SEL 

0 

0 

0 

-  Port  A  data  buffer 

0 

0 

1 

Port  A  control  buffer 

0 

1 

0 

Port  B  data  buffer 

0 

! 

1 

Port  B  control  buffer 

1 

X 

X 

Device  riot  selected 

Register 

Addressing 

Mode  control 
Input/  Output  control 

Mask  control  register 
Interrupt  mask  register 

Interrupt  enable 
Interrupt  vector 

D,  =  Dj  =  D,  =  D|,  =  I 

Next  byte  after  mode  control 
sets  mode  3 

D,  =  0,  D^  =  D|  =  Dj  =  1 

Next  byte  after  mask  control 
register  accessed  with  D^  =  1 

D3=D,=  0,D,  =  D„=  1 

D„=l 

Appendix  C  ASCII  Character 

Set 


MSD 

0 

1 

2 

3 

4 

5 

6 

7 

LSD 

000 

001 

010 

on 

100 

101 

110 

111 

0 

0000 

NUL 

DLE 

SP 

0 

@ 

P 

P 

1 

0001 

SOH 

DCl 

I 

1 

A 

Q 

a 

q 

2 

0010 

SIX 

DC2 

2 

B 

R 

b 

r 

3 

0011 

ETX 

DC3 

# 

3 

C 

S 

c 

s 

4 

0100 

EOT 

DC4 

s 

4 

D 

T 

d 

t 

5 

0101 

ENQ 

NAK 

% 

5 

E 

U 

e 

u 

6 

Olio 

ACK 

SYN 

& 

6 

F 

V 

f 

V 

7 

0111 

BEL 

ETB 

7 

G 

w 

g 

w 

8 

1000 

BS 

CAN 

{ 

8 

H 

X 

h 

X 

9 

1001 

HT 

EM 

) 

9 

1 

Y 

i 

y 

A 

1010 

LF 

SUB 

* 

J 

z 

j 

z 

B 

1011 

VT 

ESC 

+ 

K 

[ 

k 

1 

C 

1100 

FF 

FS 

< 

L 

\ 

1 

1 

D 

1101 

CR 

GS 

M 

] 
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1 

E 

1110 

SO 

RS 

e 

> 

N 

n 

F 

nil 

SI 

US 

/ 

7 

O 

0 

DEL 

0 
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A 

Absolute  address.  An  address  that  identifies  a  storage  location  or  an  I/O  device 
without  the  use  of  a  base,  offset,  or  other  factor.  See  also  Effective  address,  Relative 
offset. 

Absolute  addressing.  An  addressing  mode  in  which  the  instruction  contains  the  actual 
address  required  for  its  execution,  as  opposed  to  modes  in  which  the  instruction 
contains  a  relative  offset  or  identifies  a  base  register. 

Accumulator.  A  register  that  is  the  implied  source  of  one  operand  and  the  destination 
of  the  result  in  most  arithmetic  and  logical  operations. 

Active  transition.  The  edge  on  a  strobe  line  that  sets  an  indicator.  The  alternatives  are  a 
negative  edge  (1  to  0  transition)  or  a  positive  edge  (0  to  1  transition). 

Address.  The  identification  code  that  distinguishes  one  memory  location  or  I/O  port 
from  another  and  that  can  be  used  to  select  a  specific  one. 

Addressing  mode.  The  method  for  specifying  the  addresses  to  be  used  in  executing  an 
instruction.  Common  addressing  modes  are  direct,  immediate,  indexed,  indirect, 
and  relative. 

Address  register  A  register  that  contains  a  memory  address. 

Address  space.  The  total  range  of  addresses  to  which  a  particular  computer  may  refer 
ALU.  See  Arithmetic-logic  unit. 

Arithmetic-logic  unit  (ALU).  A  device  that  can  perform  a  variety  of  arithmetic  and 
logical  functions;  function  inputs  select  which  one  the  device  performs  during  a 
particular  cycle. 
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Arithmetic  shift.  A  shift  operation  that  keeps  the  sign  (most  significant)  bit  the  same. 
In  a  right  shift,  this  results  in  copies  of  the  sign  bit  moving  right  (called  sign 
extension). 

Arm.  Usually  refers  specifically  to  interrupts.  See  Enable. 

Array.  A  collection  of  related  data  items,  usually  stored  in  consecutive  memory 
addresses. 

ASCII  (American  Standard  Code  for  Information  Interchange).  A  7-bit  character 
code  widely  used  in  computers  and  communications. 

Assembler.  A  computer  program  that  converts  assembly  language  programs  into  a 
form  (machine  language)  that  the  computer  can  execute  directly.  The  assembler 
translates  mnemonic  operation  codes  and  names  into  their  numerical  equivalents 
and  assigns  locations  in  memory  to  data  and  instructions. 

Assembly  language.  A  computer  language  in  which  the  programmer  can  use  mne- 
monic operation  codes,  labels,  and  names  to  refer  to  their  numerical  equivalents. 

Asynchronous.  Operating  without  reference  to  an  overall  timing  source,  that  is,  at 
irregular  intervals. 

Autodecrementing.  The  automatic  decrementing  of  an  address  register  as  part  of  the 
execution  of  an  instruction  that  uses  it. 

Autoincrementing.  The  automatic  incrementing  of  an  address  register  as  part  of  the 
execution  of  an  instruction  that  uses  it. 

Automatic  mode  (of  a  peripheral  chip).  An  operating  mode  in  which  the  peripheral 
chip  produces  control  signals  automatically  without  specific  program  intervention. 

i 

Base  address.  The  address  in  memory  at  which  an  array  or  table  starts.  Also  called 
starting  address  or  base. 

Baud.  A  measure  of  the  rate  at  which  serial  data  is  transmitted;  bits  per  second, 
including  both  data  bits  and  bits  used  for  synchronization,  error  checking,  and  other 
purposes.  Common  baud  rates  are  110,  300,  1200,  2400,  4800,  9600,  and  19,200. 

Baud  rate  generator.  A  device  that  generates  the  proper  time  intervals  between  bits  for 
serial  data  transmission. 

BCD  (Binary-Coded  Decimal).  A  representation  of  decimal  numbers  in  which  each 
decimal  digit  is  coded  separately  into  a  binary  number 

Bidirectional.  Capable  of  transporting  signals  in  either  direction. 
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Binary-coded  decimal.  See  BCD. 

Binary  search.  A  search  method  that  divides  the  set  of  items  to  be  searched  into  two 
equal  (or  nearly  equal)  parts  in  each  iteration.  The  part  containing  the  item  being 
sought  is  determined  and  then  used  as  the  set  in  the  next  iteration.  Each  iteration  of  a 
binary  search  thus  halves  the  size  of  the  set  being  searched.  This  method  obviously 
assumes  an  ordered  set  of  items. 

BIOS  (Basic  Input/ Output  System).  The  part  of  CP/M  that  allov^'s  the  operating 
system  to  use  the  1/  O  devices  for  a  particular  computer.  The  computer  manufacturer 
or  dealer  typically  supplies  the  BIOS;  Digital  Research,  the  originator  of  CP/M, 
provides  only  a  sample  BIOS  with  comments. 

Bit  test.  An  operation  that  determines  whether  a  bit  is  0  or  1 .  Usually  refers  to  a  logical 
AND  operation  with  an  appropriate  mask. 

Block.  An  entire  group  or  section,  such  as  a  set  of  registers  or  a  section  of  memory. 

Block  comparison  (or  block  compare).  A  search  that  extends  through  a  block  of 
memory  until  either  the  item  being  sought  is  found  or  the  entire  block  is  examined. 

Block  move.  Moving  an  entire  set  of  data  from  one  area  of  memory  to  another. 

Block  search.  See  Block  comparison. 

Boolean  variable.  A  variable  that  has  only  two  possible  values,  which  may  be  repre- 
sented as  true  and  false  or  as  1  and  0.  See  also  Flag. 

Borrow.  A  bit  that  is  set  to  1  if  a  subtraction  produces  a  negative  resuh  and  to  0  if  it 
produces  a  positive  or  zero  result.  The  borrow  is  commonly  used  to  subtract  num- 
bers that  are  too  long  to  be  handled  in  a  single  operation. 

Bounce.  Move  back  and  forth  between  states  before  reaching  a  final  state.  Usually 
refers  to  mechanical  switches  that  do  not  open  or  close  cleanly,  but  rather  move  back 
and  forth  between  positions  for  a  while  before  settling  down. 

Branch  instruction.  See  Jump  instruction. 

Breakpoint.  A  condition  specified  by  the  user  under  which  program  execution  is  to  end 
temporarily,  used  as  an  aid  in  debugging  programs.  The  specification  of  the  condi- 
tions under  which  execution  will  end  is  referred  to  as  setting  breakpoints,  and  the 
deactivation  of  those  conditions  is  referred  to  as  clearing  breakpoints. 

BSC  (Binary  Synchronous  Communications  or  Bisync).  An  older  line  protocol  often 
used  by  IBM  computers  and  terminals. 

Bubble  sort.  A  sorting  technique  that  works  through  the  elements  of  an  array  consecu- 
tively, exchanging  an  element  with  its  successor  if  they  are  out  of  order. 
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Buffer.  Temporary  Storage  area  generally  used  to  hold  data  before  they  are  transferred 
to  their  final  destinations. 

Buffer  empty.  A  signal  that  is  active  when  all  data  entered  into  a  buffer  or  register  have 
been  transferred  to  their  final  destinations. 

Buffer full.  A  signal  that  is  active  when  a  buffer  or  register  is  completely  occupied  with 
data  that  have  not  been  transferred  to  their  final  destinations. 

Buffer  index.  The  index  of  the  next  available  address  in  a  buffer 

Buffer  pointer.  A  storage  location  that  contains  the  next  available  address  in  a  buffer. 

Bug.  An  error  or  flaw  in  a  program. 

Byte.  A  unit  of  eight  bits.  May  be  described  as  consisting  of  a  high  nibble  or  digit  (the 
four  most  significant  bits)  and  a  low  nibble  or  digit  (the  four  least  significant  bits). 

Byte-length.  A  length  of  eight  bits  per  item. 


c 

Call  (a  subroutine).  Transfer  control  to  a  subroutine  while  retaining  the  information 
required  to  resume  the  current  program.  A  call  differs  from  a  jump  or  branch  in  that 
a  call  remembers  the  previous  position  in  the  program,  whereas  a  jump  or  branch 
does  not. 

Carry.  A  bit  that  is  1  if  an  addition  overflows  into  the  succeeding  digit  position. 

Carry  flag.  A  flag  that  is  1  if  the  last  operation  generated  a  carry  from  the  most  sig- 
nificant bit  and  0  if  it  did  not. 

CASE  statement.  A  statement  in  a  high-level  computer  language  that  directs  the 
computer  to  perform  one  of  several  subprograms,  depending  on  the  value  of  a 
variable.  That  is,  the  computer  performs  the  first  subprogram  if  the  variable  has  the 
first  value  specified,  and  so  on.  The  computed  GO  TO  statement  serves  a  similar 
function  in  FORTRAN. 

Central  processing  unit  (CPU).  The  control  section  of  the  computer;  the  part  that 
controls  its  operations,  fetches  and  executes  instructions,  and  performs  arithmetic 
and  logical  functions. 

Checksum.  A  logical  sum  that  is  included  in  a  block  of  data  to  guard  against  recording 
or  transmission  errors.  Also  referred  to  as  longitudinal  parity  or  longitudinal 
redundancy  check  (LRC). 

Circular  shift.  See  Rotate. 
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Cleaning  the  stack.  Removing  unwanted  items  from  the  stack,  usually  by  adjusting  the 
stack  pointer. 

Clear.  Set  to  zero. 

Clock.  A  regular  timing  signal  that  governs  transitions  in  a  system. 

Close  (a  file).  To  make  a  file  inactive.  The  final  contents  of  the  file  are  the  last 
information  the  user  stored  in  it.  The  user  must  generally  close  a  file  after  working 
with  it. 

Coding.  Writing  instructions  in  a  computer  language. 
Combo  chip.  See  Multifunction  device. 
Command  register.  See  Control  register. 

Comment.  A  section  of  a  program  that  has  no  function  other  than  documentation. 
Comments  are  neither  translated  nor  executed,  but  are  simply  copied  into  the 
program  listing. 

Complement.  Invert;  see  also  One's  complement,  Two's  complement. 

Concatenation.  Linking  together,  chaining,  or  uniting  in  a  series.  In  string  operations, 
concatenation  refers  to  the  placing  of  one  string  after  another. 

Condition  code.  See  Flag. 

Control  (or  command)  register.  A  register  whose  contents  determine  the  state  of  a 
transfer  or  the  operating  mode  of  a  device. 

CP/M  (Control  Program/  Microcomputer).  A  widely  used  disk  operating  system  for 
Z80-based  computers  developed  by  Digital  Research  (Pacific  Grove,  CA). 

CTC  (Clock/ Timer  Circuit).  A  programmable  timer  chip  in  the  Z80  family.  A  CTC 
contains  four  8-bit  timers,  range  controls  (prescalers),  and  other  circuits. 

Cyclic  redundancy  check  (CRC).  An  error-detecting  code  generated  from  a  poly- 
nomial that  can  be  added  to  a  block  of  data  or  a  storage  area. 

D 

Data  accepted.  A  signal  that  is  active  when  the  most  recent  data  have  been  transferred 
successfully. 

Data  direction  register.  A  register  that  determines  whether  bidirectional  I/O  lines  are 
being  used  as  inputs  or  outputs. 

Data-link  control.  Conventions  governing  the  format  and  timing  of  data  exchange 
between  communicating  systems.  Also  called  a  protocol. 
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Data-link  controller.  A  chip  that  performs  all  or  most  of  the  functions  required  by  a 
data-link  control.  The  SIO  is  a  data-hnk  controller  in  the  Z80  family. 

Data  ready.  A  signal  that  is  active  when  new  data  are  available  to  the  receiver.  Same  as 
valid  data. 

DDCMP  (Digital  Data  Communications  Message  Protocol).  A  protocol  that  sup- 
ports any  method  of  physical  data  transfer  (synchronous  or  asynchronous,  serial  or 
parallel). 

Debounce.  Convert  the  output  from  a  contact  with  bounce  into  a  single  clean  transi- 
tion between  states.  Debouncing  is  most  commonly  applied  to  outputs  from 
mechanical  keys  or  switches  that  bounce  back  and  forth  before  settling  into  their 
final  positions. 

Debounce  time.  The  amount  of  time  required  to  debounce  a  change  of  state. 

Debugger.  A  systems  program  that  helps  users  locate  and  correct  errors  in  their 
programs.  Some  versions  are  referred  to  as  dynamic  debugging  tools,  or  DDTs  after 
the  famous  insecticide.  Popular  CP/M  debuggers  are  SID  (Symbolic  Instruction 
Debugger)  and  ZSID  (Z80  Symbohc  Instruction  Debugger)  from  Digital  Research. 

Debugging.  Locating  and  correcting  errors  in  a  program. 

Device  address.  The  address  of  a  port  associated  with  an  I/O  device. 

Diagnostic.  A  program  that  checks  the  operation  of  a  device  and  reports  its  findings. 

Digit  shift.  A  shift  of  one  BCD  digit  position  or  four  bit  positions. 

Direct  addressing.  An  addressing  mode  in  which  the  instruction  contains  the  address 
required  for  its  execution.  Note  that  the  standard  Z80  assembler  requires  paren- 
theses around  an  address  that  is  to  be  used  directly. 

Disable  (or  disarm).  Prevent  an  activity  from  proceeding  or  a  signal  (such  as  an 
interrupt)  from  being  recognized. 

Disarm.  Usually  refers  specifically  to  interrupts.  See  Disable. 

Double  word.  When  dealing  with  microprocessors,  a  unit  of  32  bits. 

Driver.  See  I/O  driver. 

Dump.  A  facility  that  displays  the  contents  of  an  entire  section  of  memory  or  group  of 
registers  on  an  output  device. 

Dynamic  allocation  (of  memory).  The  allocation  of  memory  for  a  subprogram  from 
whatever  is  available  when  the  subprogram  is  called.  An  alternative  is  static  alloca- 
tion of  a  fixed  area  of  storage  to  each  subprogram.  Dynamic  allocation  often 
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reduces  overall  memory  usage  because  subprograms  can  share  areas;  it  does, 
however,  generally  require  additional  execution  time  and  overhead  spent  in  memory 
management. 

E 

EBCDIC  (Expanded  Binary-Coded  Decimal  Interchange  Code).  An  8-bit  character 
code  often  used  in  large  computers. 

Echo.  Reflect  transmitted  information  back  to  the  transmitter;  send  back  to  a  terminal 
the  information  received  from  it. 

Editor.  A  program  that  manipulates  text  material  and  allows  the  user  to  make 
corrections,  additions,  deletions,  and  other  changes.  A  popular  CP/  M  editor  is  ED 
from  Digital  Research. 

Effective  address.  The  actual  address  used  by  an  instruction  to  fetch  or  store  data. 

EIA  RS-232.  See  RS-232. 

Enable  (or  arm).  Allow  an  activity  to  proceed  or  a  signal  (such  as  an  interrupt)  to  be 
recognized. 

Endless  loop  ov  jump-to-self  instruction.  An  instruction  that  transfers  control  to  itself, 
thus  executing  indefinitely  (or  until  a  hardware  signal  interrupts  it). 

Error-correcting  code.  A  code  that  the  receiver  can  use  to  correct  errors  in  messages; 
the  code  itself  does  not  contain  any  additional  message. 

Error-detecting  code.  A  code  that  the  receiver  can  use  to  detect  errors  in  messages;  the 
code  itself  does  not  contain  any  additional  message. 

Even  parity.  A  1-bit  error-detecting  code  that  makes  the  total  number  of  1  bitsinaunij 
of  data  (including  the  parity  bit)  even. 

EXCLUSIVE  OR  function.  A  logical  function  that  is  true  if  either,  but  not  both,  of  its 
inputs  is  true.  It  is  thus  true  if  its  inputs  are  not  equal  (that  is,  if  one  of  them  is  a  logic 
1  and  the  other  is  a  logic  0). 

Extend  (a  number).  Add  digits  to  a  number  to  conform  to  a  format  without  changing 
hs  value.  For  example,  one  may  extend  an  8-bit  unsigned  result  with  zeros  to  fill  a 
16-bit  word. 

External  reference.  The  use  in  a  program  of  a  name  that  is  defined  in  another  program. 

F 


F  register.  See  Flag  register. 


472    Z80  ASSEMBLY  LANGUAGE  SUBROUTINES 


Field.  A  set  of  one  or  more  positions  within  a  larger  unit,  such  as  a  byte,  word,  or 
record. 

File.  A  collection  of  related  information  that  is  treated  as  a  unit  for  purposes  of  storage 
or  retrieval. 

Fill.  Placing  values  in  storage  areas  not  previously  in  use,  initializing  memory  or 
storage. 

Flag  (or  condition  code  or  status  bit).  A  single  bit  that  indicates  a  condition  within  the 
computer,  often  used  to  choose  between  alternative  instruction  sequences. 

Flag  (software).  An  indicator  that  is  either  on  or  off  and  can  be  used  to  select  between 
two  alternative  courses  of  action.  Boolean  variable  and  semaphore  are  other  terms 
with  the  same  meaning. 

Flag  register.  A  Z80  register  that  holds  all  the  flags.  Also  called  the  (processor)  status 
register. 

Free-running  mode.  An  operating  mode  for  a  timer  in  which  it  indicates  the  end  of  a 
time  interval  and  then  starts  another  of  the  same  length.  Also  called  a  continuous 
mode. 

Function  key.  A  key  that  causes  a  system  to  execute  a  procedure  or  perform  a  function 
(such  as  clearing  the  screen  of  a  video  terminal). 

G 

Global  variable.  A  variable  that  is  used  in  more  than  one  section  of  a  computer  pro- 
gram rather  than  only  locally. 

H 

Handshake.  An  asynchronous  transfer  in  which  sender  and  receiver  exchange  signals 
to  establish  synchronization  and  to  indicate  the  status  of  the  data  transfer  Typically, 
the  sender  indicates  that  new  data  are  available  and  the  receiver  reads  the  data  and 
indicates  that  it  is  ready  for  more. 

Hardware  stack.  A  stack  that  the  computer  manages  automatically  when  executing 
instructions  that  use  it. 

Head  (of  a  queue).  The  location  of  the  item  most  recently  entered  into  a  queue. 

Header,  queue.  See  Queue  header 

Hexadecimal  (or  hex).  Number  system  with  base  16.  The  digits  are  the  decimal 
numbers  0  through  9,  followed  by  the  letters  A  through  F  (representing  10  through 
15  decimal). 
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Hex  code.  See  Object  code. 

High-level  language.  A  programming  language  that  is  aimed  toward  the  solution  of 
problems,  rather  than  being  designed  for  convenient  conversion  into  computer 
instructions.  A  compiler  or  interpreter  translates  a  program  written  in  a  high-level 
language  into  a  form  that  the  computer  can  execute.  Common  high-level  languages 
include  Ada,  BASIC,  C,  COBOL,  FORTRAN,  and  Pascal. 


I 

Immediate  addressing.  An  addressing  mode  in  which  the  data  required  by  an  instruc- 
tion are  part  of  the  instruction.  The  data  immediately  follow  the  operation  code  in 
memory. 

Index.  A  data  item  used  to  identify  a  particular  element  of  an  array  or  table. 

Indexed  addressing.  An  addressing  mode  in  which  the  address  is  modified  by  the 
contents  of  an  index  register  to  determine  the  effective  address  (the  actual  address 
used). 

Indexed  indirect  addressing.  See  Preindexing. 

Index  register.  A  register  that  can  be  used  to  modify  memory  addresses. 

Indirect  addressing.  An  addressing  mode  in  which  the  effective  address  is  the  contents 
of  the  address  included  in  the  instruction,  rather  than  the  address  itself 

Indirect  indexed  addressing.  See  Postindexing. 

Indirect  jump.  A  jump  instruction  that  transfers  control  to  the  address  stored  in  a 
register  or  memory  location  rather  than  to  a  fixed  address. 

Input  I  output  control  block  (lOCB).  A  group  of  storage  locations  that  contains  the 
information  required  to  control  the  operation  of  an  I/O  device.  Typically  included 
in  the  information  are  the  addresses  of  routines  that  perform  operations  such  as 
transferring  a  single  unit  of  data  or  determining  device  status. 

Input  I  output  control  system  (IOCS).  A  set  of  computer  routines  that  controls  the 
performance  of  I/O  operations. 

Instruction.  A  group  of  bits  that  defines  a  computer  operation  and  is  part  of  the 
instruction  set. 

Instruction  cycle.  The  process  of  fetching,  decoding,  and  executing  an  instruction. 

Instruction  execution  time.  The  time  required  to  fetch,  decode,  and  execute  an 
instruction. 
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Instruction  fetch.  The  process  of  addressing  memory  and  reading  an  instruction  into 
the  CPU  for  decoding  and  execution. 

Instruction  length.  The  amount  of  memory  needed  to  store  a  complete  instruction. 

Instruction  set.  The  set  of  general-purpose  instructions  available  on  a  given  computer; 
the  set  of  inputs  to  which  the  CPU  will  produce  a  known  response  when  they  are 
fetched,  decoded,  and  executed. 

Interpolation.  Estimating  values  of  a  function  at  points  between  those  at  which  the 
values  are  already  known. 

Interrupt.  A  signal  that  temporarily  suspends  the  computer's  normal  sequence  of 
operations  and  transfers  control  to  a  special  routine. 

Interrupt-driven.  Dependent  on  interrupts  for  its  operation;  may  idle  until  it  receives 
an  interrupt. 

Interrupt  flag.  A  bit  in  the  input/  output  section  that  is  set  when  an  event  occurs  that 
requires  servicing  by  the  CPU.  Typical  events  include  an  active  transition  on  a 
control  line  and  the  exhaustion  of  a  count  by  a  timer 

Interrupt  mask  (or  interrupt  enable).  A  bit  that  determines  whether  interrupts  will  be 
recognized.  A  mask  or  disable  bit  must  be  cleared  to  allow  interrupts,  whereas  an 
enable  bit  must  be  set. 

Interrupt  request.  A  signal  that  is  active  when  a  peripheral  is  requesting  service,  often 
used  to  cause  a  CPU  interrupt.  See  also  Interrupt  flag. 

Interrupt  service  routine.  A  program  that  performs  the  actions  required  to  respond  to 
an  interrupt. 

Interrupt  vector.  An  address  to  which  an  interrupt  directs  the  computer,  usually  the 
starting  address  of  a  service  routine. 

Inverted  borrow.  A  bit  that  is  set  to  0  if  a  subtraction  produces  a  negative  resuU  and  to 
1  if  it  produces  a  positive  or  0  result.  An  inverted  borrow  can  be  used  like  a  true 
borrow,  except  that  the  complement  of  its  value  (i.e.,  1  minus  its  value)  must  be  used 
in  the  extension  to  longer  numbers. 

lOCB.  See  Input/ output  control  block. 

IOCS.  See  Input/ output  control  system. 

//  O  device  table.  A  table  that  establishes  the  correspondence  between  the  logical 
devices  to  which  programs  refer  and  the  physical  devices  that  are  actually  used  in 
data  transfers.  An  I/O  device  table  must  be  placed  in  memory  in  order  to  run  a 
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program  that  refers  to  logical  devices  on  a  computer  with  a  particular  set  of  actual 
(physical)  devices.  The  I/O  device  table  may,  for  example,  contain  the  starting 
addresses  of  the  I/O  drivers  that  handle  the  various  devices. 

// O  driver.  A  computer  program  that  transfers  data  to  or  from  an  I/O  device,  also 
called  a  driver  or  //  O  utility.  The  driver  must  perform  initialization  functions  and 
handle  status  and  control,  as  well  as  physically  transfer  the  actual  data. 

Isolated  input j output.  An  addressing  method  for  I/O  ports  that  uses  a  decoding 
system  distinct  from  that  used  by  the  memory  section.  I/O  ports  thus  do  not  occupy 
memory  addresses. 

J 

Jump  instruction  (or  branch  instruction).  An  instruction  that  places  a  new  value  in  the 
program  counter,  thus  departing  from  the  normal  one-step  incrementing.  Jump 
instructions  may  be  conditional;  that  is,  the  new  value  may  be  placed  in  the  program 
counter  only  if  a  condition  holds. 

Jump  table.  A  table  consisting  of  the  starting  addresses  of  executable  routines,  used  to 
transfer  control  to  one  of  them. 

L 

Label.  A  name  attached  to  an  instruction  or  statement  in  a  program  that  identifies  the 
location  in  memory  of  the  machine  language  code  or  assignment  produced  from 
that  instruction  or  statement. 

Latch.  A  device  that  retains  its  contents  until  new  data  are  specifically  entered  into  it. 

Leading  edge  (of  a  binary  pulse).  The  edge  that  marks  the  beginning  of  a  pulse. 

Least  significant  bit.  The  rightmost  bit  in  a  group  of  bits,  that  is,  bit  0  of  a  byte  or  a 
16-bit  word. 

Library  program.  A  program  that  is  part  of  a  collection  of  programs  and  is  written  and 
documented  according  to  a  standard  format. 

LIFO  (last-in,  first-out)  memory.  A  memory  that  is  organized  according  to  the  order  in 
which  elements  are  entered  and  from  which  elements  can  be  retrieved  only  in  the 
order  opposite  of  that  in  which  they  were  entered.  See  also  Stack. 

Linearization.  The  mathematical  approximation  of  a  function  by  a  straight  line 
between  two  points  at  which  its  values  are  known. 

Linked  list.  A  list  in  which  each  item  contains  a  pointer  (or  link)  to  the  next  item.  Also 
called  a  chain  or  chained  list. 
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List.  An  ordered  set  of  items. 

Logical  device.  The  input  or  output  device  to  which  a  program  refers.  The  actual  or 
physical  device  is  determined  by  looking  up  the  logical  device  in  an  1/  O  device  table 
—a  table  containing  actual  I/O  addresses  (or  starting  addresses  for  I/O  drivers) 
corresponding  to  the  logical  device  numbers. 

Logical  shift.  A  shift  operation  that  moves  zeros  in  at  either  end  as  the  original  data  are 
shifted. 

Logical  sum.  A  binary  sum  with  no  carries  between  bit  positions.  See  also  Checksum, 
EXCLUSIVE  OR  function. 

Longitudinal  parity.  See  Checksum. 

Longitudinal  redundancy  check  (LRC).  See  Checksum. 

Lookup  table.  An  array  of  data  organized  so  that  the  answer  to  a  problem  may  be 
determined  merely  by  selecting  the  correct  entry  (without  any  calculations). 

Low-level  language.  A  computer  language  in  which  each  statement  is  translated 
directly  into  a  single  machine  language  instruction. 

M 

Machine  language.  The  programming  language  that  the  computer  can  execute  directly 
with  no  translation  other  than  numeric  conversions. 

Maintenance  (of  programs).  Updating  and  correcting  computer  programs  that  are  in 
use. 

Majority  logic.  A  combinational  logic  function  that  is  true  when  more  than  half  the 
inputs  are  true. 

Mark.  The  1  state  on  a  serial  data  communications  line. 

Mask.  A  bit  pattern  that  isolates  one  or  more  bits  from  a  group  of  bits. 

Maskable  interrupt.  An  interrupt  that  the  system  can  disable. 

Memory  capacity.  The  total  number  of  different  memory  addresses  (usually  specified 
in  bytes)  that  can  be  attached  to  a  particular  computer. 

Memory-mapped  IjO.  An  addressing  method  for  I/O  ports  that  uses  the  same 
decoding  system  used  by  the  memory  section.  The  I/O  ports  thus  occupy  memory 
addresses. 

Microcomputer.  A  computer  that  has  a  microprocessor  as  its  central  processing  unit. 
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Microprocessor.  A  complete  central  processing  unit  for  a  computer  constructed  from 
one  or  a  few  integrated  circuits. 

Mnemonic.  A  memory  jogger,  a  name  that  suggests  the  actual  meaning  or  purpose  of 
the  object  to  which  it  refers. 

Modem  (Modulator/ demodulator).  A  device  that  adds  or  removes  a  carrier 
frequency,  thereby  allowing  data  to  be  transmitted  on  a  high-frequency  channel  or 
received  from  such  a  channel. 

Modular  programming.  A  programming  method  whereby  the  overall  program  is 
divided  into  logically  separate  sections  or  modules. 

Module.  A  part  or  section  of  a  program. 

Monitor.  A  program  that  allows  the  computer  user  to  enter  programs  and  data,  run 
programs,  examine  the  contents  of  the  computer's  memory  and  registers,  and  utilize 
the  computer's  peripherals.  See  also  Operating  system. 

Most  significant  bit.  The  leftmost  bit  in  a  group  of  bits,  that  is,  bit  7  of  a  byte  or  bit  15  of 
a  16-bit  word. 

Multifunction  device.  A  device  that  performs  more  than  one  function  in  a  computer 
system;  the  term  commonly  refers  to  devices  containing  memory,  input/ output 
ports,  timers,  and  so  forth. 

Multitasking.  Executing  many  tasks  during  a  single  period  of  time,  usually  by  working 
on  each  one  for  a  specified  part  of  the  period  and  suspending  tasks  that  must  wait  for 
input,  output,  the  completion  of  other  tasks,  or  external  events. 

Murphy's  Law.  The  famous  maxim  that  "whatever  can  go  wrong,  will." 


N 

Negate.  Find  the  two's  complement  (negative)  of  a  number. 
Negative  edge  (of  a  binary  pulse).  A  1-to-O  transition. 
Negative  flag.  See  Sign  flag. 

Negative  logic.  Circuitry  in  which  a  logic  zero  is  the  active  or  ON  state. 

Nesting.  Constructing  programs  in  a  hierarchical  manner  with  one  level  contained 
within  another.  The  nesting  level  is  the  number  of  transfers  of  control  required  to 
reach  a  particular  part  of  a  program  without  ever  returning  to  a  higher  level. 

Nibble.  A  unit  of  four  bits.  A  byte  (eight  bits)  may  be  described  as  consisting  of  a  high 
nibble  (four  most  significant  bits)  and  a  low  nibble  (four  least  significant  bits). 
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Nine 's  complement.  The  result  of  subtracting  a  decimal  number  from  a  number  having 
nines  in  all  digit  positions. 

Non-maskable  interrupt.  An  interrupt  that  cannot  be  disabled  within  the  CPU. 

Non-volatile  memory.  A  memory  that  retains  its  contents  when  power  is  removed. 

Nop  (or  no  operation).  An  instruction  that  does  nothing  except  increment  the 
program  counter. 

Normalization  (of  numbers).  Adjusting  a  number  into  a  regular  or  standard  format.  A 
typical  example  is  the  scaHng  of  a  binary  fraction  to  make  its  most  significant  bit  1. 


o 

Object  code  (or  object  program).  The  program  that  is  the  output  of  a  translator 
program,  such  as  an  assembler— usually  a  machine  language  program  ready  for 
execution. 

Odd  parity.  A  1-bit  error-detecting  code  that  makes  the  total  number  of  1  bits  in  a  unit 
of  data  (including  the  parity  bit)  odd. 

One's  complement.  A  bit-by-bit  logical  complement  of  a  number,  obtained  by  replac- 
ing each  0  bit  with  a  1  and  each  I  bit  with  a  0. 

One-shot.  A  device  that  produces  a  pulse  output  of  known  duration  in  response  to  a 
pulse  input.  A  timer  operates  in  a  one-shot  mode  when  it  indicates  the  end  of  a  single 
interval  of  known  duration. 

Open  (a  file).  Make  a  file  ready  for  use.  The  user  generally  must  open  a  file  before 
working  with  it. 

Operating  system  (OS).  A  computer  program  that  controls  the  overall  operations  of  a 
computer  and  performs  such  functions  as  assigning  places  in  memory  to  programs 
and  data,  scheduling  the  execution  of  programs,  processing  interrupts,  and  control- 
ling the  overall  input/ output  system.  Also  known  as  a  monitor,  executive,  or 
master-control  program,  aUhough  the  term  monitor  is  usually  reserved  for  a  simple 
operating  system  with  limited  functions. 

Operation  code  (op  code).  The  part  of  an  instruction  that  specifies  the  operation  to  be- 
performed. 

OS.  See  Operating  system. 

Overflow  (of  a  stack).  Exceeding  the  amount  of  memory  allocated  to  a  stack. 
Overflow,  two's  complement.  See  Two's  complement  overflow. 
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P 

Packed  decimal.  A  binary-coded  decimal  format  in  which  each  byte  contains  two 
decimal  digits. 

Page.  A  subdivision  of  the  memory.  In  byte-oriented  computers,  a  page  is  generally  a 
256-byte  section  of  memory  in  which  all  addresses  have  the  same  eight  most 
significant  bits  {or page  number).  For  example,  page  C6  would  consist  of  memory 
addresses  C600  through  C6FF. 

Paged  address.  The  identifier  that  characterizes  a  particular  memory  address  on  a 
known  page.  In  byte-oriented  computers,  this  is  usually  the  eight  least  significant 
bits  of  a  memory  address. 

Page  number  The  identifier  that  characterizes  a  particular  page  of  memory.  In 
byte-oriented  computers,  this  is  usually  the  eight  most  significant  bits  of  a  memory 
address. 

Parallel  interface.  An  interface  between  a  CPU  and  input  or  output  devices  that  handle 
data  in  parallel  (more  than  one  bit  at  a  time).  The  PIO  is  a  parallel  interface  in  the 
Z80  family. 

Parameter  An  item  that  must  be  provided  to  a  subroutine  or  program  for  it  to  be 
executed. 

Parity.  A  1-bit  error-detecting  code  that  makes  the  total  number  of  1  bits  in  a  unit  of 
data,  including  the  parity  bit,  odd  (odd  parity)  or  even  (even  parity).  Also  called 
vertical  parity  or  vertical  redundancy  check  (VRC). 

Passing  parameters.  Making  the  required  parameters  available  to  a  subroutine. 

Peripheral  ready  A  signal  that  is  active  when  a  peripheral  can  accept  more  data. 

Physical  device.  An  actual  input  or  output  device,  as  opposed  to  a  logical  device. 

/■/O  (Parallel  Input/  Output  Device).  A  parallel  interface  chip  in  the  Z80  family.  A  PIO 
contains  two  8-bit  I/O  ports,  four  control  lines,  and  other  circuitry. 

Pointer  A  storage  place  that  contains  the  address  of  a  data  item  rather  than  the  item 
itself  A  pointer  tells  where  the  item  is  located. 

Polling.  Determining  which  I/O  devices  are  ready  by  examining  the  status  of  one 
device  at  a  time. 

Polling  interrupt  system.  An  interrupt  system  in  which  a  program  determines  the 
source  of  a  particular  interrupt  by  examining  the  status  of  potential  sources  one  at  a 
time. 

Pop.  Remove  an  operand  from  a  stack. 
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Port.  The  basic  addressable  unit  of  the  computer's  input/ output  section. 

Positive  edge  (of  a  binary  pulse).  A  0-to-l  transition. 

Postdecrementing.  Decrementing  an  address  register  after  using  it. 

Postincrementing.  Incrementing  an  address  register  after  using  it. 

Postindexing.  An  addressing  mode  in  which  the  effective  address  is  determined  by  first 
obtaining  the  base  address  indirectly  and  then  indexing  from  that  base  address.  The 
"post"  refers  to  the  fact  that  the  indexing  is  performed  after  the  indirection. 

Power fail  interrupt.  An  interrupt  that  informs  the  CPU  of  an  impending  loss  of  power. 

Predecrementing.  Decrementing  an  address  register  before  using  it. 

Preincrementing.  Incrementing  an  address  register  before  using  it. 

Preindexing.  An  addressing  mode  in  which  the  effective  address  is  determined  by 
indexing  from  the  base  address  and  then  using  the  indexed  address  indirectly.  The 
"pre"  refers  to  the  fact  that  the  indexing  is  performed  before  the  indirection.  Of 
course,  the  array  starting  at  the  given  base  address  must  consist  of  addresses  that  can 
be  used  indirectly. 

Priority  interrupt  system.  An  interrupt  system  in  which  some  interrupts  have 
precedence  over  others;  that  is,  they  will  be  serviced  first  or  can  interrupt  the  others' 
service  routines. 

Program  counter  (PC  register).  A  register  that  contains  the  address  of  the  next 
instruction  to  be  fetched  from  memory. 

Programmable  IjO  device.  An  I/O  device  that  can  have  its  mode  of  operation 
determined  by  loading  registers  under  program  control. 

Programmable  peripheral  chip  (or  programmable  peripheral  interface).  A  chip  that 
can  operate  in  a  variety  of  modes;  its  current  operating  mode  is  determined  by 
loading  control  registers  under  program  control. 

Programmable  timer  A  device  that  can  handle  a  variety  of  timing  tasks,  including  the 
generation  of  delays,  under  program  control.  The  CTC  is  a  programmable  timer  in 
the  Z80  family. 

Programmed  input/output.  Input  or  output  performed  under  program  control 
without  using  interrupts  or  other  special  hardware  techniques. 

Program  relative  addressing.  A  form  of  relative  addressing  in  which  the  base  address 
is  the  program  counter.  Use  of  this  form  of  addressing  makes  it  easy  to  move 
programs  from  one  place  in  memory  to  another. 

Protocol.  See  Data-link  control. 
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Pseudo-operation  (or  pseudo-op  or  pseudo-instruction).  An  assembly  language 
operation  code  that  directs  the  assembler  to  perform  some  action  but  does  not 
result  in  the  generation  of  a  machine  language  instruction. 

Pull.  Remove  an  operand  from  a  stack;  same  as  pop. 

Push.  Store  an  operand  in  a  stack. 

Queue.  A  set  of  tasks,  storage  addresses,  or  other  items  that  are  used  in  a  first-in, 
first-out  manner;  that  is,  the  first  item  entered  into  the  queue  is  the  first  to  be  used  or 
removed. 

Queue  header.  A  set  of  storage  locations  describing  the  current  location  and  status  of 
a  queue. 

H 

RAM.  See  Random-access  memory. 

Random-access  (read j write)  memory  (RAM).  A  memory  that  can  be  both  read  and 
altered  (written)  in  normal  operation. 

Read-only  memory  (ROM).  A  memory  that  can  be  read  but  not  aUered  in  normal 
operation. 

Ready  for  data.  A  signal  that  is  active  when  the  receiver  can  accept  more  data. 

Real-time.  In  synchronization  with  the  actual  occurrence  of  events. 

Real-time  clock.  A  device  that  interrupts  a  CPU  at  regular  time  intervals. 

Real-time  operating  system.  An  operating  system  that  can  act  as  a  supervisor  for 
programs  that  have  real-time  requirements.  May  also  be  referred  to  as  a  real-time 
executive  or  real-time  monitor 

Reentrant.  A  program  or  routine  that  can  be  executed  concurrently  while  the  same 
routine  is  being  interrupted  or  otherwise  held  in  abeyance. 

Refresh.  Rewriting  data  into  a  memory  before  its  contents  are  lost.  Dynamic  RAM 
must  be  refreshed  periodically  (typically  every  few  milliseconds)  or  it  will  lose  its 
contents  spontaneously. 

Register  A  storage  location  inside  the  CPU. 

Register  pair  In  Z80  terminology,  two  8-bit  registers  that  can  be  referenced  as  a  16-bit 
unit. 
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Relative  addressing.  An  addressing  mode  in  which  the  address  specified  in  the 
instruction  is  the  offset  from  a  base  address. 

Relative  offset.  The  difference  between  the  actual  address  to  be  used  in  an  instruction 
and  the  current  value  of  the  program  counter. 

Relocatable.  Can  be  placed  anywhere  in  memory  without  changes;  that  is,  a  program 
that  can  occupy  any  set  of  consecutive  memory  addresses. 

Return  (from  a  subroutine).  Transfer  control  back  to  the  program  that  originally 
called  the  subroutine  and  resume  its  execution. 

ROM.  See  Read-only  memory. 

Rotate.  A  shift  operation  that  treats  the  data  as  if  they  were  arranged  in  a  circle;  that  is, 
as  if  the  most  significant  and  least  significant  bits  were  connected  either  directly  or 
through  a  Carry  bit. 

Row  major  order.  Storing  elements  of  a  multidimensional  array  in  memory  by 
changing  the  indexes  starting  with  the  rightmost  first.  For  example,  if  a  typical 
element  is  A(I,J,K)  and  the  elements  begin  with  A(0,0,0),  the  order  is  A(0,0,0), 
A(0,0,1),...,A(0,1,0),  A(0,1,1),....  The  opposite  technique  (changing  the  leftmost 
index  first)  is  called  column  major  order 

RS-232  (or  EIA  RS-232).  A  standard  interface  for  the  transmission  of  digital  data, 
sponsored  by  the  Electronic  Industries  Association  of  Washington,  D.C.  It  has  been 
partially  superseded  by  RS-449. 


Scheduler.  A  program  that  determines  when  other  programs  should  be  started  and 
terminated. 

Scratchpad.  An  area  of  memory  that  is  generally  easy  and  quick  to  use  for  storing 
variable  data  or  intermediate  results. 

SDLC.  (Synchronous  Data  Link  Control).  The  successor  protocol  to  BSC  for  IBM 
computers  and  terminals. 

Semaphore.  See  Flag. 

Serial.  One  bit  at  a  time. 

Serial  interface.  An  interface  between  a  CPU  and  input  or  output  devices  that  handle 
data  serially.  The  SIO  is  a  popular  serial  interface  chip  in  the  Z80  family.  See  also 
UART 

Setpoint.  The  value  of  a  variable  that  a  controller  is  expected  to  maintain. 
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Shift  instruction.  An  instruction  that  moves  all  the  bits  of  the  data  by  a  certain 
number  of  bit  positions,  just  as  in  a  shift  register. 

Signed  number.  A  number  in  which  one  or  more  bits  represent  whether  the  number  is 
positive  or  negative.  A  common  format  is  for  the  most  significant  bit  to  represent 
the  sign  (0  =  positive,  1  =  negative). 

Sign  extension.  The  process  of  copying  the  sign  (most  significant)  bit  to  the  right  as  in 
an  arithmetic  shift.  Sign  extensioH  preserves  the  sign  when  two's  complement 
numbers  are  being  divided  or  normalized. 

Sign  flag.  A  flag  that  contains  the  most  significant  bit  of  the  resuh  of  the  previous 
operation.  It  is  sometimes  called  a  negative  flag,  since  a  value  of  1  indicates  a 
negative  signed  number. 

Sign  function.  A  function  that  is  Oifits  parameter  is  positive  and  1  if  its  parameter  is 
negative. 

SIO  (Serial  Input/  Output  Device).  A  serial  interface  chip  in  the  Z80  family.  An  SIO 
can  be  used  as  an  asynchronous  or  synchronous  serial  interface  (i.e.,  as  a  UART  or 
USRT)  or  as  a  data-hnk  controller. 

Size  (of  an  array  dimension).  The  distance  in  memory  between  elements  that  are 
ordered  consecutively  in  a  particular  dimension;  the  number  of  bytes  between  the 
starting  address  of  an  element  and  the  starting  address  of  the  element  with  an  index 
one  larger  in  a  particular  dimension  but  the  same  in  all  other  dimensions. 

Software  delay.  A  program  that  has  no  function  other  than  to  waste  time. 

Software  interrupt.  See  Trap. 

Software  stack.  A  stack  that  is  managed  by  means  of  specific  instructions,  as  opposed 
to  a  hardware  stack  which  the  computer  manages  automatically. 

Source  code  (or  source  program).  A  computer  program  written  in  assembly  language 
or  in  a  high-level  language. 

Space.  The  zero  state  on  a  serial  data  communications  line. 

Stack.  A  section  of  memory  that  can  be  accessed  only  in  a  last-in,  first-out  manner. 
That  is,  data  can  be  added  to  or  removed  from  the  stack  only  through  its  top;  new 
data  are  placed  above  the  old  data  and  the  removal  of  a  data  item  makes  the  item 
below  it  the  new  top. 

Stack  pointer.  A  register  that  contains  the  address  of  the  top  of  a  stack. 

Standard  (or  8.4,2,1)  BCD.  A  BCD  representation  in  which  the  bit  positions  have  the 
same  weight  as  in  ordinary  binary  numbers. 
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Standard  teletypewriter.  A  teletypewriter  that  operates  asynchronously  at  a  rate  of 
ten  characters  per  second. 

Start  bit.  A  1-bit  signal  that  indicates  the  start  of  data  transmission  by  an  asynchro- 
nous device. 

Static  allocation  (of  memory).  Assignment  of  fixed  storage  areas  for  data  and  pro- 
grams; an  aUernative  is  dynamic  allocation,  in  which  storage  areas  are  assigned 
when  they  are  needed. 

Status  register.  A  register  whose  contents  indicate  the  current  state  or  operating  mode 
of  a  device. 

Status  signal.  A  signal  that  describes  the  current  state  of  a  transfer  or  the  operating 
mode  of  a  device. 

Stop  bit.  A  1-bit  signal  that  indicates  the  end  of  data  transmission  by  an  asynchro- 
nous device. 

String.  An  array  (set  of  data)  consisting  of  characters. 

String  functions.  Procedures  that  allow  the  programmer  to  operate  on  data  consist- 
ing of  characters  rather  than  numbers.  Typical  functions  are  insertion,  deletion, 
concatenation,  search,  and  replacement. 

Strobe.  A  signal  that  identifies  or  describes  another  set  of  signals  and  can  be  used  to 
control  a  buffer,  latch,  or  register 

Subroutine.  A  subprogram  that  can  be  executed  (called)  from  more  than  one  place  in 
a  main  program. 

Subroutine  call.  The  process  whereby  a  computer  transfers  control  from  its  current 
program  to  a  subroutine  while  retaining  the  information  required  to  resume  the 
current  program. 

Subroutine  linkage.  The  mechanism  whereby  a  computer  retains  the  information 
required  to  resume  its  current  program  after  it  completes  the  execution  of  a 
subroutine. 

Suspend  (a  task).  HaU  execution  and  preserve  the  status  of  a  task  until  some  future 
time. 

Synchronization  (or  sync)  character  A  character  that  is  used  only  to  synchronize  the 
transmitter  and  the  receiver 

Synchronous.  Operating  according  to  an  overall  timing  source  or  clock,  that  is,  at 
regular  intervals. 
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Systems  software.  Programs  that  perform  administrative  functions  or  aid  in  the 
development  of  other  programs  but  do  not  actually  perform  any  of  the  computer's 
workload. 

T 

Tail  (of  a  queue).  The  location  of  the  oldest  item  in  the  queue,  that  is,  the  earliest 
entry. 

Task.  A  self-contained  program  that  can  serve  as  part  of  an  overall  system  under  the 
control  of  a  supervisor. 

Task  status.  The  set  of  parameters  that  specifies  the  current  state  of  a  task.  A  task  can 
be  suspended  and  resumed  as  long  as  its  status  is  saved  and  restored. 

Teletypewriter.  A  device  containing  a  keyboard  and  a  serial  printer  that  is  often  used  in 
communications  and  with  computers.  Also  referred  to  as  a  Teletype  (a  registered 
trademark  of  Teletype  Corporation  of  Skokie,  Illinois)  or  TTY. 

Ten 's  complement.  The  result  of  subtracting  a  decimal  number  from  zero  (ignoring  the 
minus  sign);  the  nine's  complement  plus  one. 

Terminator.  A  data  item  that  has  no  function  other  than  to  signify  the  end  of  an  array. 

Threaded  code.  A  program  consisting  of  subroutines,  each  of  which  automatically 
transfers  control  to  the  next  one  upon  its  completion. 

Timeout.  A  period  during  which  no  activity  is  allowed  to  proceed;  an  inactive  period. 

Top  of  the  stack.  The  address  containing  the  item  most  recently  entered  into  the 
stack. 

Trace.  A  debugging  aid  that  provides  information  about  a  program  while  the  pro- 
gram is  being  executed.  The  trace  usually  prints  all  or  some  of  the  intermediate 
results. 

Trailing  edge  (of  a  binary  pulse).  The  edge  that  marks  the  end  of  a  pulse. 

Translate  instruction.  An  instruction  that  converts  its  operand  into  the  correspond- 
ing entry  in  a  table. 

Transparent  routine.  A  routine  that  operates  without  interfering  with  the  operations 
of  other  routines. 

Trap  (or  software  interrupt).  An  instruction  that  forces  a  jump  to  a  specific  (CPU- 
dependent)  address,  often  used  to  produce  breakpoints  or  to  indicate  hardware  or 
software  errors. 

True  borrow.  See  Borrow. 
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True  comparison.  A  comparison  that  finds  the  two  operands  to  be  equal. 

Two 's  complement.  A  binary  number  that,  when  added  to  the  original  number  in  a 
binary  adder,  produces  a  zero  result.  The  two's  complement  of  a  number  may  be 
obtained  by  subtracting  the  number  from  zero  or  by  adding  1  to  the  one's  com- 
plement. 

Two's  complement  overflow.  A  situation  in  which  a  signed  arithmetic  operation 
produces  a  result  that  cannot  be  represented  correctly;  that  is,  the  magnitude 
overflows  into  the  sign  bit. 

u 

CM/?r  (Universal  Asynchronous  Receiver/ Transmitter).  An  LSI  device  that  acts  as 
an  interface  between  systems  that  handle  data  in  parallel  and  devices  that  handle 
data  in  asynchronous  serial  form. 

Underflow  (of  a  stack).  Attempting  to  remove  more  data  from  a  stack  than  has  been 
entered  into  it. 

Unsigned  number  A  number  in  which  all  the  bits  are  used  to  represent  magnitude. 

USART  (Universal  Synchronous/ Asynchronous  Receiver/ Transmitter).  An  LSI 
device  (such  as  the  SIO)  that  can  serve  as  either  a  UART  or  a  USRT. 

USRT  (Universal  Synchronous  Receiver/  Transmitter).  An  LSI  device  that  acts  as  an 
interface  between  systems  that  handle  data  in  parallel  and  devices  that  handle  data 
in  synchronous  serial  form. 

Utility.  A  general-purpose  program,  usually  supplied  by  the  computer  manufacturer 
or  part  of  an  operating  system,  that  executes  a  standard  or  common  operation  such 
as  sorting,  converting  data  from  one  format  to  another,  or  copying  a  file. 

V 

Valid  data.  A  signal  that  is  active  when  new  data  are  available  to  the  receiver. 

Vectored  interrupt.  An  interrupt  that  produces  an  identification  code  (or  vector)  that 
the  CPU  can  use  to  transfer  control  to  the  appropriate  service  routine.  The  process 
whereby  control  is  transferred  to  the  service  routine  is  called  vectoring. 

Volatile  memory.  A  memory  that  loses  its  contents  when  power  is  removed. 

w 

Walking  bit  test.  A  procedure  whereby  a  single  1  bit  is  moved  through  each  bit 
position  in  an  area  of  memory  and  a  check  is  made  as  to  whether  it  can  be  read  back 
correctly. 
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Word.  The  basic  grouping  of  bits  tiiat  a  computer  can  process  at  one  time.  When 
deaUng  with  microprocessors,  the  term  often  refers  to  a  16-bit  unit  of  data. 

Word  boundary.  A  boundary  between  16-bit  storage  units  containing  two  bytes  of 
information.  If  information  is  being  stored  in  word-length  units,  only  pairs  of  bytes 
conforming  to  (ahgned  with)  word  boundaries  contain  valid  information.  Mis- 
aligned pairs  of  bytes  contain  one  byte  from  one  word  and  one  byte  from  another. 

Word-length.  A  length  of  16  bits  per  item. 

Wraparound.  Organization  in  a  circular  manner  as  if  the  ends  were  connected.  A 
storage  area  exhibits  wraparound  if  operations  on  it  act  as  if  the  boundary 
locations  were  contiguous. 

Write-only  register.  A  register  that  the  CPU  can  change  but  cannot  read.  If  a  program 
must  determine  the  contents  of  such  a  register,  it  must  save  a  copy  of  the  data 
placed  there. 

z 

Zero  flag.  A  flag  that  is  1  if  the  last  operation  produced  a  result  of  zero  and  0  if  it  did 
not. 

Zoned  decimal.  A  binary-coded  decimal  format  in  which  each  byte  contains  a  single 
decimal  digit. 


A 

A  register.  See  Accumulator 
Abbreviations,  recognition  of,  289,  297,  298 
Absolute  branches,  3-4 
Absolute  value,  82-83,  84-85,  186,  222-23 
Accumulator  (register  A),  5,  6,  7,  8,  9 
clearing,  15 

decimal  operations,  73,  74,  124 

decision  sequences,  31 

functions,  5,  6,  7 

instructions,  7 

special  features,  2,  8 

testing,  92 
Accumulator  rotates,  3,  20,  23 
ADC,  42,  73-74 

decimal  version,  73 

result,  42 

rotate  (ADC  A,A),  91 
ADC,  42,  73-74 

logical  shifts  (A,  HL,  xy),  23,  35,  89 
Addition 

BCD,  72,  73,  248-50 

binary,  16,  41-42,  72-74,  228-30 

decimal,  72,  73,  248-50 

8-bit,  16,  72,  73 

multiple-precision,  41-42,  228-30,  248-50 

16-bit,  72-73,  74 
Addition  instructions 

with  Carry,  42,  73-74 

without  Carry,  16,  72-73 
Address  addition,  3,  4,  33,  34 
Address  arrays,  35,  39 

Address  format  in  memory  (upside-down),  5,  11 
Addressing  modes,  10,  13 

arithmetic  and  logical  instructions,  2 

autoindexing,  129-34 

default  (immediate),  17,  149 

direct,  10-11,  13,  94,  95,  96,  97 

immediate,  1 1 ,  95 

indexed,  3,  12,  14,  103,  127-29 

indirect,  2,  3,  11-12,  13,  94-95,  96-97,  126-27 

jump  and  call  instructions,  148 

postindexed,  136-37 

preindexed,  134-36 

register,  2 

register  indirect,  2 
Add /subtract  (N)  flag,  ix,  74 
Adjust  instructions,  124 
AF  register  pair,  12 
Aligning  bit  fields,  272 
Alternate  (primed)  registers,  4,  96,  97 


AND,  85-86 

clearing  bits,  18,  19,  85 

masking,  268,  271 

testing  bits,  18,  19 
Apostrophe  indicating  ASCII  character,  x 
Arithmetic 

BCD,  72-78,  248-66 

binary,  16-18,  72-80,  217-47 

decimal,  72-78,  248-66 

8-bit,  16-18,  72-80 

multiple-precision,  41-42,  228-66 

16-bit,  73-80,  217-27 
Arithmetic  expressions,  evaluation  of,  132 
Arithmetic  instructions,  72-84 

addressing  modes,  2 

8-bit,  445,  446 

multiple  operands,  16 

16-bit,  143,  447 
Arithmetic  shift,  80,  89,  273-75 
Arrays,  33-38,  128-37,  319-55 

addresses,  39,  129-30,  131,  352-55 

initialization,  195-97 

manipulation,  33-38 
ASCII,  150,  463 

assembler  notations,  x 

control  characters,  357 

conversions.  172-94 

table,  463 

ASCII  to  EBCDIC  conversion,  189-91 
Assembler 

defaults,  x,  149,  155,  455 

error  recognition,  155-56 

format,  x,  455 

pseudo-operations,  x,  455 

summary,  455 
Autoindexing,  129-34 
Autopostdecrementing,  133-34 
Autopostincrementing,  130-31 
Autopredecrementing,  131-32 
Autopreincrementing,  129-30 
Auxiliary  carry  (A^)  flag,  ix.  See  also  Half-carry 

B 

B  (indicating  binary  number),  x 

B  register,  special  features  of,  5,  6,  9,  30,  32,  54 

Backspace,  destructive,  362-63 

Base  address  of  an  array  or  table,  33-35,  38-39 

BC  register  pair,  5,  9,  12,  36 

BCD  (decimal)  arithmetic,  72-78,  248-66 

BCD  representation,  150 

BCD  to  binary  conversion,  170-71 
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BDOS  calls  (in  CP/  M),  359-63,  366-67,  379-84 

table,  357 
Bidirectional  mode  of  PIO,  62 
Bidirectional  ports,  61-62,  63-64,  158 
Binary  search,  331-35 
Binary  to  BCD  conversion,  167-69 
BIT,  18.  19,  93-94,  341 
Bit  field  extraction,  267-69 
Bit  field  insertion,  270-72 
Bit  manipulation,  18-20,  85-87,  88.  93-94,  101, 

102,  267-72 

instructions,  449 
Block  compare,  35-38,  288-91,  444 

flags,  37 

registers,  36.  37 
Block  input/ output  instructions,  54-55,  452 

initialization.  385,  387 

limitations.  54 

registers,  54 
Block  move,  35-38,  99.  198-200 
Block  search.  444.  See  also  Block  compare 
Boolean  algebra,  18-20 
Borrow,  27.  76 

Branch  instructions.  24-31.  102-18,  450 

absolute  branches.  3-4 

conditional  branches.  104-18 

decision  sequences,  31 

relative  branches.  3-4,  32 

signed  branches,  112-13 

unconditional  branches,  102-04 

unsigned  branches,  113-18 
Buffered  interrupts,  413-24 
Byte  shift,  181 

c 

C  register,  special  use  of,  6,  9,  54 
Calendar,  425-32 
Call  instructions,  118-20.  451 
Carry  (C)  flag.  453 

adding  to  accumulator,  72 

arithmetic  applications,  41-42 

borrow,  142 

branches,  27-28 

clearing,  101 

comparison  instructions,  27-28,  142,  144 
decimal  arithmetic,  72,  74 
decrement  instructions  (no  effect).  4 
extending  across  accumulator.  84 
increment  instructions  (no  effect),  4 
instructions  affecting,  3.  453 
inverted  borrow.  76,  142 
logical  instructions,  3 
multiple-precision  arithmetic,  41-42 
position  in  F  register,  ix,  434 
SBC,  42 


Carry  (C)  flag  (continued) 
shifts,  3,  20 

subtracting  from  accumulator,  76 
subtraction,  42,  76 
Case  statements,  39 

Character  manipulation,  39-40.  See  also  String 

manipulation 
Checksum,  87.  See  also  Parity 
Circular  shift  (rotation),  20-22,  91-92,  282-87 
Cleaning  the  stack,  49-51 
Clear  instructions,  100-01 
Clearing  accumulator,  100 
Clearing  an  array,  196-97,  258,  262 
Clearing  bits,  18,  19.  85,  101 
Clearing  flags.  86 
Clearing  memory.  258.  262 
Clearing  peripheral  status,  61-62,  157,  158,  159, 

389,  399 
Clock  interrupt,  425-32 
Code  conversion.  40-41,  167-94 
Colon  (deUmiter  after  label),  x 
Command  register.  See  Control  register 
Commands,  execution  of,  134 
Comment,  x 

Common  programming  errors,  139-59 

interrupt  service  routines,  158-59 

I/O  drivers,  156-58 
Communications  between  main  program  and 

interrupt  service  routines.  159,  394-95, 

413-14 

Communications  reference,  369 
Compacting  a  string.  311 
Comparison  instructions,  81-82 

bit-by-bit  (logical  EXCLUSIVE  OR),  81 

Carry  flag,  27.  144 

decimal,  266 

multiple-precision.  245-47 

operation,  26 

16-bit.  81-82,  225-27 

string,  288-91 

Zero  flag,  26 
Complementing  (inverting)  bits,  18,  19,  20,  88 
Complementing  the  accumulator.  87-88 
Complement  (logical  NOT  )  instructions,  87-89 
Concatenation  of  strings.  292-96 
Condition  code.  See  Flags;  Status  register 
Conditional  call  instructions,  120 
Conditional  jump  instructions,  104-18 

execution  time  (variable),  450 
Conditional  return  instructions.  120 
Control  characters  (ASCII),  357 

deletion,  362-63 

printing,  360 
Control  register,  59-64,  157-58 
Control  signal,  57-58 
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Copying  a  substring,  302-07 

Conventions,  5 

CP,  26-29,  142,  144 

CPD,  36 

CPDR,  36 

CPI,  36,  40,  350 

CPIR,  36,  37,  40,  153 

CP/  M  operating  system,  356-67,  379-84 

BDOS  functions,  357 

buffer  format,  367,  382 

string  terminator,  359,  363 
CRC  (cyclic  redundancy  check),  368-72 
CTC  (clock/timer  circuit),  388,  427-28 


D 

DAA,  151 

Data  direction  (I/O  control)  register,  60 

Data  structures,  44-46,  148-49,  414 

Data  transfer  instructions,  94-102,  142 

DB  pseudo-operation,  x 

DE  register  pair,  special  features  of,  2,  5,  6,  9 

Debugging,  139-59 

interrupt  service  routines,  158-59 

I/O  drivers,  156-58 
DEC,  4,  32 

differences  between  8-  and  16-bit  versions,  4 
flags,  4 

Decimal  (BCD)  arithmetic,  151,  248-66 
addition,  248-50 
binary  conversions,  167-71 
comparison,  266 
decrement  by  1,  78,  124 
division,  260-65 
8-bit,  72-78 

increment  by  1,  77,  124 

multibyte,  248-66 

multiplication,  254-59 

subtraction,  231-33 

validity  check,  124 
Decimal  default  in  assembler,  149,  150 
Decision  sequences,  31 
Decrement  instructions,  77-78 

decimal,  78,  124 

setting  Carry,  78 
Defaults  in  assembler,  x,  149,  155,  455 
DEFB  pseudo-operation,  x,  48 
DEFS  pseudo-operation,  x 
DEFW  pseudo-operation,  x,  48 
Delay  program,  391-93 
Deletion  of  a  substring,  308-12 
Device  numbers,  56-57,  373-84 
Digit  (4-bit)  shift,  90,  152-53,  256,  257,  264 
Digit  swap,  90 


Direct  addressing,  10-11,  13 

arithmetic  and  logical  instructions,  lack  of,  2 

parentheses  around  addresses,  x,  149,  155 
Direction  of  stack  growth,  46 
Disassembly  of  numerical  operation  codes, 

439-41 
Division,  80 

by  2,  80,  333 

by  4,  80 

by  10,  168 

by  100,  168 

decimal,  260-65 

multiple-precision  binary,  239-44 
remainder,  sign  of,  221 
simple  cases,  43,  80 
16-bit,  220-24 
DJNZ,  30,  32 

Documentation  of  programs,  60 

Double  operands  in  arithmetic  instructions,  16 

Doubling  an  index,  35,  39 

Drivers  (I/O  routines),  57,  373-74 

Dynamic  allocation  of  memory,  49,  66,  125-26 


EBCDIC  to  ASCII  conversion,  192-94 
El,  65,  124 

position  in  return  sequence,  121 
8080  additions,  4,  22,  29,  74,  124 

incompatibility  (Parity  flag),  29 
Enabling  and  disabling  interrupts,  124-25 

accepting  an  interrupt,  64 

Dl,  124 

EI,  65,  124 

interrupt  status,  saving  and  restoring,  124-25 

interrupt  status,  testing,  105,  107,  124-25 

unserviced  output  interrupt,  405 

when  required,  158-59 
END  pseudo-operation,  x 
Endless  loop  (wait)  instruction,  123 
EQU  pseudo-operation,  x 
Equal  values,  comparison  of,  26-27,  142 
Error-correcting  codes.  See  CRC 
Error-detecting  codes.  See  Parity 
Error  handling,  162-63 
Errors  in  programs,  139-59 
Even  parity  (parity/ overflow)  flag,  29 
EX,  64,  96,  97,99,  121,444 
EX  DE,HL,  10 
EX  (SP),  12,  67,  119,  121 
Exchange  instructions,  99-100 
Exchanging  elements,  34 
Exchanging  pointers,  100 
EXCLUSIVE  OR  function,  18,  19 
EXCLUSIVE  OR  instructions,  87 
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Execution  time,  reducing,  67-68 
Execution  times  for  instructions,  442-52 
Extend  instructions,  84 
EXX,  64 

F 

F  (ttag)  register,  ix,  86-87,  95,  97,  4.34 
FIFO  buffer  (queue),  45-46,  414 
Fill  memory,  99,  195-97 
Flag  register,  ix,  86-87,  95,  97,  434 
Flags,  4.34,  45.3 

instructions,  effects  of,  3,  453 

loading,  95 

organization  in  flag  register,  ix,  434 

storing,  97 

summary,  453 

use,  31 
Format  errors,  149-51 
Format  for  storing  16-bit  addresses,  5,  II 

H 

H  (half-carry)  flag,  434 

H  (indicating  hexadecimal  number),  x,  150 

Handshake,  61-62 

Head  of  a  queue,  45,  414 

Hexadecimal  ASCII  to  binary  conversion,  175-77 
Hexadecimal  to  ASCII  conversion,  172-74 
Hexadecimal  numbers,  zero  in  front,  149 
HL  register  pair,  special  features,  2,  8-9 
use,  3,  5 


IFFl  (interrupt  flip-flop  I),  435 
1FF2  (interrupt  flip-flop  2),  105,  107,  123,  124-25, 
435 

Immediate  addressing,  11,  17 
assembler  notation,  17,  148 
default,  17,  148 
use  of,  11 

Implicit  effects  of  instructions,  152-53 
INC,  3,  4 

differences  between  8-  and  16-bit  versions,  4 

flags,  3,  4 
Increment  instructions,  76-77 

decimal,  77,  124 

setting  Carry,  76 
IND,  54 

Indexed  addressing,  33-35,  38-39,  127-29 
data  structures,  5,  377-78,  384 
generalized  form,  3 
limitations,  3 
loading,  12 

parameter  retrieval,  47-48 
storing,  14 
Indexed  call,  119-20,  352-55 

leaving  register  pairs  unchanged,  353-54 


Indexed  jump,  39,  103,  119 
Indexing  of  arrays,  33-35,  201-16 

byte  arrays,  42-43,  201-04 

multidimensional  arrays,  209-16 

two-dimensional  byte  array,  42-43,  201-04 

two-dimensional  word  array,  205-08 

word  arrays,  205-08 
Index  registers,  3 

backup  to  HL,  9 

features,  9 

instructions,  6 

secondary  status,  4 

uses,  5 

Indirect  addressing,  3,  11-12,  13,  126-27 

indexed  addressing  with  zero  offset,  12 

jump  instructions,  102-03 

multilevel  versions,  127 

subroutine  calls,  119-20 
Indirect  call,  119-20,  .352-55 
Indirect  jump,  102-03 
INDR,  54 
INI,  54,  55 
INIR,  54,  55 
Initialization 

arrays,  195-97 

CTC,  388 

indirect  addresses,  15 

interrupt  service  routines,  64-66 

interrupt  vectors,  398,  408,  418 

I/O  devices,  6.3-64,  385-90 

PIO,  63-64,  ,390,  410-11 

RAM,  15-16,  195-97 

SIO,  388-89,  400-02,421-22 
Initialization  errors,  154 
Input/ Output  (I/O) 

block  I/O  instructions.  54-55 

control  block  (lOCB),  373-84 

device-independent,  56-57 

device  table,  56-57,  373-84 

differences  between  input  and  output,  157,  .395 

errors,  156-58 

indirect  addressing,  51-52,  58 

initialization,  63-64,  385-90 

instructions,  51-55,  452 

interrupt-driven,  64-66,  394-424 

logical  devices,  56-57 

output,  generalized,  365-67 

peripheral  chips,  58 

physical  devices,  56-57 

read-only  ports,  53,  158 

status  and  control,  57-58 

terminal  handler,  356-64 

write-only  ports,  53-54,  57-58,  62,  65-66,  157 
Inserting  a  character,  181 
Insertion  into  a  string,  313-18 
Instruction  execution  times,  442-52 
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Instruction  set,  433-55 

alphabetical  list,  436-39 

asymmetry,  5 

numerical  list,  439-41 
Interrupt  enable  flip-flops  (IFFl  and 

IFF2),  4,  105,  107,  123,  124-25,  435 
Interrupt  latency,  65 
Interrupt  response,  64,  435 
Interrupts.  See  also  Enabling  and  disabling 
interrupts 

buffered,  413-24 

elapsed  time,  425-32 

handshake,  394-424 

initialization,  158,  398,  408,  418,  427-28 

instructions,  446 

latency,  65 

modes,  64,  158,  398,  435 
order  in  stack,  65 
PIO,  60,  404-12,  459,  460,  461 
programming  guidelines,  64-66,  158-59 
real-time  clock,  425-32 
reenabling,  64,  123,  159,  410 
response,  64,  435 
service  routines,  394-432 
structure,  435 
Interrupt  service  routines,  394-432 
CTC,  425-32 
errors,  158-59 
examples,  394-432 

main  program,  communicating  with,  159, 

394-95,  413-14 
PIO,  404-12 

programming  guidelines,  64-66,  158-59 

real-time  clock,  425-32 

SIO,  394-403,  413-24 

terminating  instructions,  66 
Interrupt  status,  5,  105,  107,  124-25 
Interrupt  vector  register,  95,  97,  398,  435 
Invertfed  borrow  in  subtraction,  75,  76,  142 
Inverting  bits,  18-20,  88 
Inverting  decision  logic,  140,  142 
I/O  control  block  (lOCB),  373-84 

example,  381 

format,  374 
I/O  device  table,  56-57,  373-84 
I/O  instructions,  452 

J 

JP,  24-31 

addressing  terminology,  148 
block  move  or  block  compare,  37 
overflow  branches,  28-30,  112-13 

JR.  25-29,  68 

comparison  with  absolute  branches,  3-4 
flag  limitations,  3-4 

Jump  and  link,  103-04 


Jump  instructions,  450 

Jump  table,  39,  103,  119,  149,  352-55 

L 

LD,  10-12,  13,  14-16 

8080  instruction  set,  additions,  38 

order  of  operands,  10,  141 
LDD,  36,  37 

LDDR,  36,  37,  181,  200,  318 
LDl,  36,  37 

LDIR,  36,  37,  99,  196,  200,  295,  306,  311,  318 

Limit  checking,  27-30 

Linked  list,  45-46,  373,  374,  377-79 

List  processing,  45-46,  377-79 

Load  instructions,  10-16,  94-96 

8-bit,  442 

flags,  3,  142 

order  of  operands,  10,  141 

16-bit,  443 
Logical  I/O  devices,  56-57,  373-84 
Logical  instructions,  85-94,  445 

addressing  modes,  2 

Carry,  clearing  of,  3,  143 

limitations,  2 
Logical  shift,  20,  22,  23,  89-90,  276-81 
Logical  sum,  87.  See  also  Parity 
Long  instructions,  4 

Lookup  tables,  38-39,  41,  68,  69,  125,  189-94 
Loops,  30,  32-33 

reorganizing  to  save  time,  67 
Lower-case  ASCII  letters,  187-88 

M 

Masking  bits,  18,  268,  271 

Maximum,  325-27 

Median  (of  3  elements),  342-44 

Memory  fill,  99,  195-97 

Memory-mapped  I/O,  51-53 

Memory  test,  347-51 

Memory  usage,  reduction  of,  68-69 

Millisecond  delay  program,  391-93 

Minimum,  328-30 

Missing  addressing  modes,  126-37 

Missing  instructions,  3,  71-126 

Move  instructions,  97-99 

Move  left  (bottom-up),  198,  199-200 

Move  multiple,  99 

Move  right  (top-down),  198,  199-200 
Multibit  shifts,  23,  273-87 

Multibyte  entries  in  arrays  or  tables,  34-35,  38-39, 

125,  205-16 
Multidimensional  arrays,  209-16 
Multilevel  indirect  addressing,  127 
Multiple  names  for  registers,  2 
Multiple-precision  arithmetic,  41-42,  228-66 
Multiple-precision  shifts,  273-87 
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Multiple-precision  shifts  (continued) 

arithmetic  right,  21i-15 

digit  (4-bit)  left,  264 

logical  left,  276-78 

logical  right,  279-81 

rotate  left,  285-87 

rotate  right,  282-84 
Multiplexing  displays,  62 
Multiplication,  42-43,  78-79 

by  a  small  integer,  42-43 

by  10,  171,  185 

by  2,  35 

decimal,  254-59 

multiple-precision,  234-38,  254-59 
16-bit,  217-19 

Multiway  branches  (jump  table),  39,  103,  119,  352-55 

N 

N  (add/ subtract)  flag,  74,  434 
Negative,  calculation  of,  82-83,  222-23 
Negative  logic,  89,  157 
Nested  loops,  32-33 
New  line  string,  356,  361-62 
Nibble  (4  bits),  171,  173 
Nine's  complement,  83 
Non-maskable  interrupt,  65,  66,  123 
NOP,  filling  with,  195 
Normalization,  90-91 
Normalizing  array  bounds,  215-16 
NOT  instructions,  87-89,  268 
Numerical  comparisons,  26-31 

o 

One-dimensional  arrays,  33-38 
One's  complement,  87-89 
Operation  (op)  codes 

alphabetical  order,  436-39 

numerical  order,  439-41 
OR,  18,  86-87,  268,  272 
Ordering  elements,  34 
ORG  pseudo-operation,  x 
OTDR,  54 
OTIR,  54,  387 
OUTD,  54 
OUTI,  54,  55,  153 

Output  interrupts,  unserviced,  395,  405 
Output  line  routine,  365-67 
Overflow  (P/V)  flag,  3,  28 

branches  (PE,  PO),  28,  29,  112 
Overflow  of  a  stack,  46,  108,  109 
Overflow,  two's  complement,  28-.30,  112-13 
Overlapping  memory  areas,  198-200 

P 

P/V  (parity/ overflow)  flag,  434.  See  also  Parity/ 

overflow  flag 
Parameters,  passing,  46-51,  161 


Parentheses  around  addresses  (indicating  "con- 
tents of"),  X,  149,  155 
Parity/  overflow  flag,  3,  35-36,  434 

block  moves  and  compares,  35-36,  37 

interrupt  enable  flag,  4,  124-25 

overflow  indicator,  28,  112,  225,  227 

reversed  polarity  in  block  move  and  compare,  37 
Passing  parameters,  46-51 ,  161 

memory,  47-48 

registers,  46-47 

stack,  49-51 

subroutine  convention,  161 
PC  register  See  Program  counter 
Physical  I/O  device,  56-57 
PIO  (parallel  input/ output  device),  58-64,  457-62 

addressing,  59-60 

control  hues,  61-62 

initialization,  63-64,  390,  410-11 

interrupt-driven  I/O,  404-12 

operating  modes,  61-62 

reference,  457-62 

registers,  59-60 
Pointer 

exchanging,  99-100,  243,  265 

loading,  96 
Polling,  57-58 
POP,  12 

Pop  instructions,  122-23 
Position  of  a  substring,  297-301 
Postdecrement,  133-34 
Postincrement,  12,  130-31 
Postindexing,  136-37 
Predecrement,  12,  131-32 
Preincrement,  129-30 
Preindexing,  134-36 
Primed  (alternate)  registers,  4,  96,  97 
Processor  status  (flag)  register,  434 
Program  counter 

CALL,  118-20 

RET,  120-2! 
Programmable  I/O  devices,  58 

advantages,  58 

CTC,  388,  427-28 

initialization,  385-90 

operating  modes,  58 

PIO,  58-64,  404-12,  457-62 

SIO,  388-89,  394-403,  413-24 
Programming  model  of  microprocessor,  433 
Pseudo-operations,  x,  455 
PUSH,  14,  141 
Push  instructions,  122 

Q 

Queue,  45-46,  414 
Quicksort,  336-46 

Quotation  marks  around  ASCII  string,  x 
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R 

RAM,  481 

filling,  99,  195-97 

initialization,  15-16,  154 

saving  data,  13-14 

testing,  347-51 
Read-only  memory,  48 
Read-only  ports,  53,  158 
Ready  flag  (for  use  with  interrupts),  394-95 
Real-time  clock,  425-32 
Recursive  program  (quicksort),  336-46 
Reenabling  interrupts,  65,  124-25 
Reentrancy,  47 
Refresh  (R)  register,  95,  97 
Register  pairs,  ix,  2,  433 

instructions,  6,  8 

loading,  11 
Registers,  5-15 

functions,  5 

instructions,  6-8 

length,  ix 

names,  2 

order  in  stack,  65 

passing  parameters,  46-47 

primed,  4,  96,  97 

programming  model,  433 

saving  and  restoring,  65,  121 

secondary,  4 

special  features,  8-9 

transfers,  10 
Register  transfers,  10 
Relative  branches,  3-4,  32 
RES,  18,  19,  53-54 
Reset 

CTC,  388 

PIO,  61,  63 

SIO,  389 

Restart  instructions,  64,  65,  451,  454 
RETl,  66 
RETN,  66 

Return  address,  changing  of,  120-21 

Return  instructions,  120-21 

Return  from  interrupt  instructions,  121 

Return  with  skip  instructions,  120-21 

RL,  20,  53 

RLC,  20 

RLD,  264 

ROM  (read-only  memory),  48 

Rotation  (circular  shift),  20-22,  24,  91-92,  282-87 

Row  major  order  (for  storing  arrays),  205,  209 

RR,  20,  80 

RRC,  20 

RRD,  152-53,  257 
RST,  64,  65,451,454 


s 

Saving  and  restoring  interrupt  status,  5,  105,  107, 
124-25 

Saving  and  restoring  registers,  12,  14,  64-66,  121 
SBC  A, A  (extend  Carry  across  A),  84 
Searching,  35-38,  331-35 
Secondary  instructions,  4,  38 
Secondary  registers,  4 
Semicolon  indicating  comment,  x 
Serial  input/ output,  394-403,  413-24 
SET,  18-20,  53 
Set  instructions,  102 
Set  Origin  (ORG)  pseudo-operation,  x 
Setting  bits  to  1,  18-20,  102 
Setting  directions 
initialization,  158 

PIO  (control  mode).  60,  63-64,  459 
Setting  nags,  86-87 
Shift  instructions,  20-24,  89-92,  448 

byte,  181 

diagrams,  21-23 

digit,  152-53 

multibit,  23,  273-87 

multibyte,  273-87 

32-bit  left  shift,  223 

24-bit  left  shift,  180 
Sign  byte,  184-85 
Sign  extension,  20,  23-24.  273-75 
Sign  flag,  28-30,  142-43 
Sign  function,  84 
Signed  division,  220-24 
Signed  branches,  28-30,  112-13 
Signed  numbers,  28-30 
Signs,  comparison  of  29,  222 
SIO  (Serial  Input/ Output  Device),  388-89, 

394-403,413-24 
16-bit  address  format,  5 
16-bit  operations,  217-27 

absolute  value,  83 

addition,  72-73,  74 

average,  333 

comparison,  81-82,  225-27 
counter,  32-33.  35 
division,  220-24 
flags,  effect  on.  3 
indexing,  128 
instructions,  443,  447 
multiplication,  217-19 
pop,  12 
push,  14 
registers,  ix 
shifts,  89-92 
subtraction,  27,  74-76 
test  for  zero,  93 
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6800  microprocessor,  differences  from,  5 
6809  microprocessor,  differences  from,  5 
Skip  instructions,  118,  120-21 
SLA,  20 

Slow  instructions,  4,  38 
Software  delay,  391-93 
Software  stack,  46 
Sorting,  336-46 

references,  338 
SP  register.  See  Stack  pointer 
Special  cases,  162-63 
Special  features  of  processor,  2-5 
SRA,  20,  23,  80 
SRL,  20,  80 
Stack,  12,  14,  49-51 

cleaning,  49,  50 

data  transfers,  12,  14 

diagrams,  50,  51 

downward  growth,  5,  12 

overflow,  46 

passing  parameters,  49-51 
pointer,  6,  7,  12,  49-51 
POP,  12 
PUSH,  14 
saving  registers,  65 
software,  46 
underflow,  46 
Stack  pointer 

automatic  change  when  used,  12 

comparison,  82 

contents,  5,  12 

decrementing,  12 

definition,  12 

dynamic  allocation  of  memory,  49,  66,  125-26 

features,  9 

incrementing,  14 

moving  to  HL,  49 

transfers,  98 
Stack  transfers,  12,  14,  46 
Status  bit.  See  Flags;  Flag  register 
Status  signals,  57-58 
Status  values  in  I/O,  375 
Store  instructions,  effect  on  flags  (none),  3 
String  operations,  39-40,  288-318 

abbreviations,  recognition  of,  289,  297,  298 

compacting,  311 

comparison,  288-91 

concatenation,  292-96 

copying  a  substring,  302-07 

deletion,  308-12 

insertion,  313-18 

matching  a  substring,  300 

position  of  substring,  297-301 

search,  39-40 


Strobe,  61-62 

SUB,  single  operand  in,  16 

Subroutine  call,  49,  118-20 

saving  memory,  68-69 

variable  addresses,  118-20 
Subroutine  linkage,  49,  103-04,  161 
Subscript,  size  of,  206,  209,  210 
Subtraction,  74-76 

BCD,  74-76,  231-33 

binary,  74-76,  231-33 

Carry  flag,  27,  76 

decimal,  74-76,  231-33 

8-bit,  74-76 

inverted  borrow,  75,  76,  142 

multiple-precision,  231-33 

reverse,  75 

16-bit,  27,  74-76 
Subtraction  instructions,  74-76 

in  reverse,  75 

with  borrow,  76 

without  borrow,  74-75 
Summation,  33 

binary,  33 

8-bit,  33,  319-21 

16-bit,  322-24 
Systems  programs,  conflict  with,  140 

T 

Table,  38-39,  41,  68,  69,  125,  189-94 
Table  lookup,  38-39,  41,  125 
Tail  of  a  queue,  414 
Ten's  complement,  82-83 
Terminal  I/O,  356-67 
Testing,  92-94 

array,  241,  262 

bits,  18,  19,  25-26,  85 

bytes,  92-93 

multiple-precision  number,  241 ,  262 

16-bit  number,  93 
32-bit  left  shift,  223 
Threaded  code,  44 
Threshold  checking,  27-31 
Timeout,  391-93 
Timing  for  instructions,  442-52 
Top  of  stack,  12 

Transfer  instructions,  effect  on  flags,  3 

Translate  instructions,  125 

Trivial  cases,  162 

True  comparison,  35,  38 

24-bit  left  shift,  180 

Two-byte  entries,  34-35,  38-39,  125 

Two-dimensional  arrays,  42-43,  201-08 

Two's  complement,  82-83 

Two's  complement  overflow,  28-30,  112-13 
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u 

Unconditional  jump  instructions,  102-04 
Underflow  of  stack,  46 
Upside-down  addresses,  5,  11 

V 

Validity  check  for  BCD  number,  124 

w 

Wait  instructions,  123 

Walking  bit  test,  347-49 

Wraparound  of  buffer,  414 

Write-only  ports,  53-54,  57-58,  62,  65-66,  157 


z 

Zero  flag,  142 
block  compares,  37 
block  I/O,  54 
branches,  142 
comparisons,  26 
inversion  in  masking,  19,  25 
load  instructions,  3 
masking,  19,  93 

position  in  flag  register,  ix,  434 
transfer  instructions,  3 
uses,  25-27,  31 
Zero  in  front  of  hexadecimal  numbers,  149 


Z80® 

Assembly  Language 

Subroutines 

.  * 

by  Lance  A.  Leventhal  and  Winthrop  Saville 


Save  valuable  programming  time  with  this  collection  of  more  than 
40  useful  subroutines.  Each  routine  has  been  documented,  tested, 
and  debugged,  and  is  ready  to  use  immediately. 

ZSO'  Assembly  Language  Subroutines  provides  you  with 
—General  Z80  programming  methods  (including  a  quick  summary 
■'or  experienced  programmers). 

—  Routines  for  array  manipulation,  arithmetic,  bit  manipulation, 
code  conversion,  string  processing,  input/output,  and  interrupts. 

—A  discussion  of  common  Z80  assembly  language  programming 
■ .  errors,  as  well  as  the  strengths  and  weaknesses  of  the  Z80- 
instruction  set. 

—  Directions  for  implementing  additional  instructions  and 
addressing  modes. 

With  these  subroutines,  you  can 

—  Run  a  specific  routine. 

—Speed  up  a  program  written  in  a  high-level  language  such  as 

BASIC,  Pascal,  or  Fortran. 
—Assist  in  programming  an  I/O  driver,  a  diagnostic,  a  utility  or  a 

J 

systems  program. 

—  Debug,  maintain,  or  revise  an  existing  program. 
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